CGIに依存しないPerlの話題一般/Part2 (258レス)
前次1-
抽出解除 必死チェッカー(本家) (べ) 自ID レス栞 あぼーん

リロード規制です。10分ほどで解除するので、他のブラウザへ避難してください。
204: 03/11/08 23:12 ID:U/fdC1Uy(1) AAS
ActivePerlで試したよ。
local($from,$to,@data) = @_;

unless(open(DELI,"| " . $deliveryprocess . " " . $from . " " . $to)){
return 0;
}

print DELI @data;
close(DELI);

return 1;

てなコードで、

#! /usr/bin/perl

print $ARGV[0] . "\r\n";
print $ARGV[1] . "\r\n";

while(<STDIN>){
print;
}

while(1){}

なスクリプトにパイプでデータ送ったら見事にブロックしてくれやがりました。
開発中止。
前次1-
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ

ぬこの手 ぬこTOP 0.015s