您是否disconnect会将-code的部分称为线噪声,还是将其保留为原样?
disconnect
use DBI; my $dbh = DBI->connect ... ... ... END { $dbh->disconnect or die $DBI::errstr if $dbh; }
如果您在执行所有工作后退出程序,则从数据库中显式断开连接不是绝对必要的。但这是一个好主意,尤其是在您已执行多个连接或将要执行多个顺序连接的程序中。
有关更多信息,请参见对Perl DBI进行编程。