作者deh3215 ()
看板Perl
标题[问题]读入.txt档的URL并将取得html存档
时间Sun Feb 22 00:23:02 2009
file.txt 内容为:
http://www.yaho.com.tw
http://www.pcdvd.com.tw
http://www.pchome.com.tw
use LWP::Simple;
my $i = 0;
open(INPUT, "c:/file.txt");
@temp = <INPUT>;
chomp @temp;//多这行
foreach $t (@temp) {
$content = get($t); //原本"$t"改$t
$i++;
open (OUTPUT, ">C:/$i.txt");
print OUTPUT "$content";
}
麻烦各位了!!
需求:将file.txt开档存进阵列,并依阵列内的url连结取得html source并存成.txt档
问题:C的确存进1.txt 2.txt 3.txt,不过内容都是空白? 问题似乎在
$content = get("$t");这行....
已自行解决...thx 不过抓html source存档有点慢..
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 59.116.15.9
※ 编辑: deh3215 来自: 59.116.15.9 (02/22 01:18)
※ 编辑: deh3215 来自: 59.116.15.9 (02/22 01:19)