アカウント名:
パスワード:
より多くのコメントがこの議論にあるかもしれませんが、JavaScriptが有効ではない環境を使用している場合、クラシックなコメントシステム(D1)に設定を変更する必要があります。
犯人は巨人ファンでA型で眼鏡をかけている -- あるハッカー
SC○だったら (スコア:0)
#というperlスクリプトを書こうと思ったけど、書き方が分からないヘタレなのでAC.
#だれか教えて。
Re:SC○だったら (スコア:1)
#!/usr/bin/perl
$flag=0;$\="\n";
while(<>){
chomp;
if($flag){
s/.../SCO/g;
}elsif(/(.*Copyright \(C\))(.*)/){
$a=$1; $_=$2;
s/.../SCO/g;
$_=$a.$_;
$flag=1;
}
print;
}
-- 哀れな日本人専用(sorry Japanese only) --
Re:SC○だったら (スコア:0)
open( FILES , ' find . -type f |' );
foreach $f ( <FILES> ){
open( FILE , "$f");
@all = <FIlE>;
close(FILE);
open( FILE , ">$f");
foreach $l ( @all ){
$l =~ s/Copyright \(C\)/Copyright \(C\) SCO and/g;
print FILE "$l";
}
close(FILE);
}
# 適当に付きAC
Re:SC○だったら (スコア:0)