R.A. Epigonos et al.

[Perl] -pオプション

-pオプションをつかって下のように書いた場合。

$ perl -pe 's/a/b/g' file

これを書き下すと下のようになるそうだ。

while(<>){
        s/a/b/g; # '...' の中身
        print;
}

まぁ多少わかりにくいかも知れんので、正確さは失われるがもっと書き下してみた。

open IN, "file"; # 引数
while(<IN>){
        $_ =~ s/a/b/g; # '...' の中身
        print $_;
}
close IN;
exit;

ソーシャルブックマーク

  1. はてなブックマーク
  2. Google Bookmarks
  3. del.icio.us

ChangeLog

  1. Posted: 2007-08-22T14:13:01+09:00
  2. Modified: 2007-08-22T04:05:05+09:00
  3. Generated: 2023-08-27T23:09:12+09:00