作者satisf (= =)
看板Perl
标题[问题] 关於get 的小小问题
时间Fri Aug 21 22:02:53 2009
while (my $ref = $only->fetchrow_hashref()) # 选取成杂凑
{
$user=$ref->{'id'};
$link=$ref->{'link'};
&scribe_data();
$article=get("$link");
print $article;
}
以上是我写的一小段程式码
while以上是我的资料库连结~
测试结果是没问题的
可是到了 $article=get..... 这一行
执行时却出现了
Undefined subroutine &main::scribe_data called
不知道原因是甚麽
因为有另外一个程式也是这样写
不过就没出现这样的问题
请大大指点指点
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.127.220.23
1F:→ satisf:後来竟然只是没汇出LWP::Simple的模组~~窘!! 08/22 17:45