我在 Perl 中有以下脚本:
#!/usr/bin/perl
use strict;
use warnings;
use DBI;
use XML::LibXML;
my $dbname = "test";
my $dbhost = "localhost";
my $dbuser = "user";
my $auth = "password";
my $dbh = DBI->connect("DBI:mysql:$dbname:$dbhost", $dbuser, $auth);
print "The end\n";
当我运行它时,它会输出“The end”,然后在没有任何错误或警告的情况下停止。我在 FreeBSD 9.1、Perl 5.12.4 上运行它
没有“使用 XML::LibXML;”也可以正常工作 或没有“我的 $dbh = DBI->connect("DBI:mysql:$dbname:$dbhost", $dbuser, $auth);"
我试图在 gdb 中运行它。它会在一切正常的情况下执行,但会在以下几行停止,而不会终止:
[新 LWP 100828] [新线程 80187d000 (LWP 100828/perl5.12.4)]
有人有同样的问题吗?