Kazuho@Cybozu Labs

# 標準入力から URL を読み込んでクロール

use Gungho::Inline;
use IO::Select;

Gungho::Inline->new({
  provider => sub {
    my ($c, $p) = @_;
    while (IO::Select->new(STDIN)->can_read(0)) {
      return if STDIN->eof;
      my $url = STDIN->getline;
      chomp $url;
      $p->add_request($c->prepare_request(Gungho::Request->new(GET => $url)));
    }
    1;
  },
  handler => sub {
    my ($req, $res) = @_;
    print $res->code, ' ', $req->uri, "\n";
  },
})->run();

　このモジュール (Gungho::Inline) は、こちらからダウンロードできるようにしておきます。こういう要望もありますということでよろしくお願いします。マイナーな需要だったら無視してください m(__)m

おお、ありがとうございます。まだ細部までは見てないですが、奥さんのコードを使って方向でよいでしょうか？

よろしければコミット権も差し上げますので、あとでgoogleアカウント教えてくださいー。

こちらこそ、Gungho 便利に使わせていただいています。

コードを (というより、このような機能を) 取り込んでいただければ助かります。Gungho/Inline.pm を別のクラスとして残すのか Gungho.pm に取り込むのかという問題や、実装にバグがないかという点はありますが。

現時点で他の改良ネタは思いつかないので、コミット権はいただいてもいただかなくてもかまいません。