perlのマッチは一行モードじゃないとだめなはず