8.3 ファイル内の全ての単語を処理する

cshのforeach関数のように、ファイル内の全ての単語に対して、任意の処理を行いたい。

• splitを使用して、各行を空白文字で分割する。

while (<>) {
  for $chunk (split) {
    # $chunkに対する処理を書く
  }
}

• m//g演算子を使用して、単語を1つずつ取り出す

while (<>) {
  while ( /(\w[\w'-]*/g ) {
    # $1に対する処理を書く
  }
}