2012-10-17から1日間の記事一覧
$ cat foo.pl while(<>) { ~ s/(#)(\d)/SHARP$2/g; print; } $ cat input.txt aaa #123 #456 #7 #89 #0 hoge foo bar #fff #777 $ perl foo.pl input.txt aaa SHARP123 SHARP456 SHARP7 SHARP89 SHARP0 hoge foo bar #fff SHARP777
$ cat foo.pl while(<>) { ~ s/(#)(\d)/SHARP$2/g; print; } $ cat input.txt aaa #123 #456 #7 #89 #0 hoge foo bar #fff #777 $ perl foo.pl input.txt aaa SHARP123 SHARP456 SHARP7 SHARP89 SHARP0 hoge foo bar #fff SHARP777
