連番のＨ画像/動画を一気にダウンロードする3

連番のＨ画像/動画を� ..

494:453
10/10/12 23:24:36
>453 の方にバグあり。

URLリストの読み込み後、改行コード消してない。
AnalyzeUrl()関数がエラー復帰時、エラー処理で$IndexUrlを出力してるけどクリアされている。
（$IndexUrlがNULLなら$IndexUrlを出力せよ orz）

>493 のソースで
93行と94行の間に
chomp($ListURL);

172行
($IndexUrl, $pageURL, $bookID, $pageNow) = AnalyzeUrl($IndexUrl);
↓ 修正
my $UrlTmp=$IndexUrl;
($IndexUrl, $pageURL, $bookID, $pageNow) = AnalyzeUrl($IndexUrl);

177行目
OutPutLog($ErrorLogName,"\n".GetTimeStr()."\nUrl Analyze Error\nURL : $IndexUrl\n")
↓ 修正
OutPutLog($ErrorLogName,"\n".GetTimeStr()."\nUrl Analyze Error\nURL : $UrlTmp\n");

181行目
OutPutLog($RegetBatFileName,"$ExePerlName $IndexUrl\n");
↓ 修正
OutPutLog($RegetBatFileName,"$ExePerlName $UrlTmp\n");

すまんかった。

次ページ

続きを表示

1を表示