$str="abcdef";for ($str=~/(..)/g){print "$_\n"}
$str="abcdef";for (split(/(..)/g,$str)){print "$_\n"}
これの出力結果が違うのはどうしてですか？下のものには
余計な空の行が入ってしまうように思います。