社内ひきこもり中

シェルを落とせない

昨日作成したスクリプト，連続して動かしておこうと思って，

$ ./jsonp.pl &
$ exit

とかやったら止まってしまいました．nohupを使ってもだめ．色々やってみるとどうも，stdio関係でエラーがでてるっぽい．ってことはHTTP::Request::AsCGIが被疑対象かと．CPANをざっと見てHTTP::Request::Paramsというモジュールがあるのを見つけたので，こちらを使うことにしました．これを使えば

$ nohup ./jsonp.pl &
$ exit

とやことでスクリプトが止まらないことを確認しました．新しいhelloメソッドはこんな感じになります．

sub hello {
    my ( $req, $res ) = @_;
    my ( $parser, $params, $from );

    $parser = HTTP::Request::Params->new( { req => $req } );
    $params = $parser->params;
    $from   = $$params{from};
    $receiver{ refaddr $res}{NAME} = $from;
    return RC_WAIT;
}

さて，クライアント側の作り直しを始めるかな．そのためにhttp://blog.morrisjohns.com/javascript_closures_for_dummiesを読んでJavaScriptでのClosureの勉強〜