2008-03-16 8.3 ファイル内の全ての単語を処理する Perl Cookbook cshのforeach関数のように、ファイル内の全ての単語に対して、任意の処理を行いたい。 splitを使用して、各行を空白文字で分割する。 while (<>) { for $chunk (split) { # $chunkに対する処理を書く } } m//g演算子を使用して、単語を1つずつ取り出す while (<>) { while ( /(\w[\w'-]*/g ) { # $1に対する処理を書く } }