■スレッドリストへ戻る■ 全部 1- 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 最新50

2ch閉鎖の危機なんだと

54 :Perler ◆GSi39OA6 :2001/08/25(土) 19:46
>>47
print "...";ってPerl??

Perlなら、

$flag = ($ENV{HTTP_ACCEPT_ENCODING} =~ /gzip/);

print "Content-Encoding: gzip\n" if($flag);
open STDOUT, "|gzip -cfn3" if($flag);
ってとこかな。

253KB
新着レスの表示

スレッドリストへ戻る 全部 前100 次100 最新50

0ch BBS 2004-10-30