いつもお世話になります。
perl+mechanizeで、スクレイピングスクリプトを書いております。
$mech->reload();
にて、44秒~2分程度、サーバーから反応がない場合があります。この場合$mech->contentからは、"500 Server closed connection without sending any data back"というエラーを得ることができます。
この$mech->reload()時に、例えば、5秒待って、サーバーから反応がない場合は、次の処理に進ませる実装方法はありますでしょうか?
$mechの生成時に、
$mech = WWW::Mechanize->new(timeout => 5);
などとして、タイムアウト時間を5秒に設定することも出来るようですが、前記$mech->reload()時の時のみ5秒間のタイムアウト時間としたいのです。というのも、その他の箇所で、$mechは時間をかけてもよいからです。
以上、すみませんが、ご存知の方がいらっしゃいましたら、ご教示願います。
No.1ベストアンサー
- 回答日時:
#!/usr/bin/perl
use warnings;
use strict;
use WWW::Mechanize;
my $mech = WWW::Mechanize->new();
print "default ", $mech->timeout, "[sec]\n";
$mech->timeout(5);
print "modified ", $mech->timeout, "[sec]\n";
---
default 180[sec]
modified 5[sec]
_--_1l1_1_さん
ありがとうございます。タイムアウトを短くしたい処理の前で$mech->timeout(5);を実行し、処理が終わったら、$mech->timeout(デフォルト秒);に戻せばいいのですね。
トライしてみます。ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
テキストファイルで提出とは?
-
ファイルアイコンの左下に緑の□...
-
Cygwin64のtermio(s).hについて
-
ラズベリーパイ初心者です。 ラ...
-
INDIRECT 横に再度抽出したい
-
perlをバージョンアップしたら...
-
Perlで特定文字列から特定文字...
-
perl 正規表現でエラー
-
アルファベットに付いて質問し...
-
perlのflock関数でロックをかけ...
-
perlプログラミング 空白行削除
-
perlの構文でカンマの意味が分...
-
Perlでファイルの末尾から指定...
-
perl 初等プログラミングについて
-
Perl言語について。
-
ファイルをディレクトリ分配の...
-
#!/usr/bin/perlで書きだしたCG...
-
Perlのエラーについてご教授く...
-
AI sisterとは、偽物の人ですか?
-
bashスクリプト
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
mechanizeのタイムアウト処理に...
-
Win32でInputBoxを実装するには?
-
NAME が同じ複数の INPUT デー...
-
Perl/TkでURLを既定のブラウザ...
-
正規表現で指定範囲の文字列の取得
-
TwitterAPI1.1でGetメソッド(...
-
Perl での XML 処理での DTD 宣...
-
URI.pmの使い方を教えてくださ...
-
LWP::Simpleでのgetについて
-
BEGIN{}での変数宣言
-
Perl LWPでのIPv6エラー
-
例外処理のフローチャートの記...
-
Excel VBAでリンク切れをチェッ...
-
LCD ディスプレイを Raspberry ...
-
「デバイスは PRN を初期化でき...
-
ユーザー定義関数に#NAME?が返...
-
VBSがコンパイルエラーになりま...
-
Excel VBAで、ユーザーフォーム...
-
VBでグローバル変数を宣言するには
-
Excel VBA 『Call』で呼び出す...
おすすめ情報