带有DBI的perl守护进程Proc::daemon::Init问题
我有一个如下所述的计划:带有DBI的perl守护进程Proc::daemon::Init问题,perl,daemon,Perl,Daemon,我有一个如下所述的计划: use DBI; use Proc::Daemon; Proc::Daemon::Init; my $continue = 1; $SIG{TERM} = sub { $continue = 0 }; while ($continue) { my $db=DBI->connect('DBI:mysql:xx;user=root;password=xxx'); my $sth=$db->prepare("select *
use DBI;
use Proc::Daemon;
Proc::Daemon::Init;
my $continue = 1; $SIG{TERM} = sub { $continue = 0 };
while ($continue) {
my $db=DBI->connect('DBI:mysql:xx;user=root;password=xxx');
my $sth=$db->prepare("select * from cpu_mem_calls ");
$sth->execute();
while (my @row=$sth->fetchrow_array()){
$x=$row[0]+200;
$y=$row[1]+200;
my $db_test=DBI->connect('DBI:mysql:xx;user=root;password=xxx');
my $sth=$db->prepare("insert into cpu_mem_calls values ($x,$y,'2011-03-21 17:19:00')");
$sth_test->execute();
$sth_test->finish();
$db_test->disconnect();
$sth->finish();
$db->disconnect();
sleep(5);
}
当我使用
Proc::Daemon::Init
module+DBI
时,我可以将值插入数据库,但当我想从数据库中选择一些值时,它将无法工作。它不会返回任何值。这里面真正的问题是什么?DBI在使用Proc::Daemon::Init
运行时是否有任何问题?我已经解决了问题…我试图从文件中读取一些IP…因为它是一个无法从文件中读取的守护进程..我将所有内容放在一个数组中,一切都开始正常工作