Perlについての質問箱 30箱目

Perlについての質問箱 30箱目at TECH

Perlについての質問箱 30箱目 - 暇つぶし2ch■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

750:デフォルトの名無しさん
 07/05/23 09:49:31 
なるほどFastCGIか。 
Rubyだとわりと簡単にFastCGI対応できるみたい。 
Perlでも同じようにできないかな？ 
 
既存のCGIを変更無しでFastCGIに 
ttp://sugi.nemui.org/wiki/%B4%FB%C2%B8%A4%CECGI%A4%F2%CA%D1%B9%B9%CC%B5%A4%B7%A4%C7FastCGI%A4%CB

751:デフォルトの名無しさん
 07/05/23 09:55:29 
てか、CatalystとかCGI::Applicationとかのフレームワーク使えばいいじゃん。 
 
Catalyst::Engine::FastCGI 
http://search.cpan.org/~mramberg/Catalyst-Runtime-5.7007/lib/Catalyst/Engine/FastCGI.pm 
 
CGI::Application::FastCGI 
http://search.cpan.org/~naoya/CGI-Application-FastCGI-0.02/lib/CGI/Application/FastCGI.pm

752:デフォルトの名無しさん
 07/05/23 12:07:10 
>>738がなんでわざわざWebProg板からこっちに着たのかわからない

753:デフォルトの名無しさん
 07/05/23 14:12:31 
すみませんが 質問させてください 
 
あるファイル（数万行の数字データ）の上から１行ずつ順番に読み込んで 
最終行になるとまた１行目に戻って・・・という作業をしたいのです 
途中でプログラムを閉じて再開したときも次の行から開始が可能であれば 
もう言うことナシですが，残念ながら自分では何とも出来ず 
 
丸２日間ネット上で調べに調べ 
 
srand(); 
open(FILE, "data.txt"); 
rand($.) < 1 and $line = $_ while <FILE>; 
close(FILE); 
$line =~ s/\n//g; 
 
とランダムで１行読み込む仕様で妥協するのが限界でした 
もし上記作業がperlで可能でしたら申し訳ないですが 
教えていただけないでしょうか 
 
可能な方いらっしゃいましたら どうかお願いします。

次ページ