> > テキスト読み込み→,0,1,1を,0,0,0に置換→終了
> > なでしこで作ろうとしたけどヽ(´ー｀)ノさっぱり
> perlですまないが
> open( my $hf, '<', $ARGV[0] );
> my $text = eval { local $/ = undef; <$hf> };
> $text =~ s{\Q$ARGV[1]\E}{$ARGV[2]}g;
> print $text;
> ｺﾏﾝﾄﾞﾗｲﾝからreplace.pl foobar.txt ,0,1,1 ,0,0,0 > replaced.txt
> で使えるよ(;´Д`)間違いあるかもしれないけど

おーー(;´Д`)できたーーｸｼｺ
でもこれだとまだﾉｰﾄﾊﾟｯﾄﾞで置換したほうが早いなあ

参考：2008/03/28(金)05時56分41秒

水

餃

子

の

王

将

> > evalじゃなくてdoだった(;´Д`)まあいいや
> my $text = <$hf>;
> はだめなの？(;´Д`)

それだと一行しか読めなくないかい(;´Д`)

参考：2008/03/28(金)06時03分43秒

> evalじゃなくてdoだった(;´Д`)まあいいや

my $text = <$hf>;
はだめなの？(;´Д`)

参考：2008/03/28(金)06時00分28秒

evalじゃなくてdoだった(;´Д`)まあいいや

> > 引っ越しするなら結局全部自分で梱包してヤマト便で送るのがいちばん安いな(;´Д`)
> いくら？(;´Д`)
> 妹が引越しするんだけど
> 父親がﾚﾝﾀｶｰ借りて往復するほうが安かったからそうしたとかいってたんだけど

東京から四国でベッドとかのデカイのは東京で処分したけど
全部で１万５０００円だったな(;´Д`)
俺は家具が少ないというのもあるが

参考：2008/03/28(金)05時55分04秒

http://www.amazon.co.jp/exec/obidos/ASIN/B000XSPNTW/
うーん伊藤静(;´Д`)

> > もう少し具体的に(;´Д`)
> テキスト読み込み→,0,1,1を,0,0,0に置換→終了
> なでしこで作ろうとしたけどヽ(´ー｀)ノさっぱり

perlですまないが

open( my $hf, '<', $ARGV[0] );
my $text = eval { local $/ = undef; <$hf> };
$text =~ s{\Q$ARGV[1]\E}{$ARGV[2]}g;
print $text;

ｺﾏﾝﾄﾞﾗｲﾝからreplace.pl foobar.txt ,0,1,1 ,0,0,0 > replaced.txt
で使えるよ(;´Д`)間違いあるかもしれないけど

参考：2008/03/28(金)05時38分15秒

> 引っ越しするなら結局全部自分で梱包してヤマト便で送るのがいちばん安いな(;´Д`)

ﾔﾏﾄ便の安さは異常

参考：2008/03/28(金)05時51分14秒

> 引っ越しするなら結局全部自分で梱包してヤマト便で送るのがいちばん安いな(;´Д`)

いくら？(;´Д`)
妹が引越しするんだけど
父親がﾚﾝﾀｶｰ借りて往復するほうが安かったからそうしたとかいってたんだけど

参考：2008/03/28(金)05時51分14秒

引っ越しするなら結局全部自分で梱包してヤマト便で送るのがいちばん安いな(;´Д`)