perl 先読み後読みパターンマッチ

　(?=パターン)　 肯定の先読み　 この先にパターンが出てくる場所にマッチ
　(?!パターン)　 否定の先読み　 この先にパターンが出てこない場所にマッチ
　(?<=パターン)　肯定の後読み　 この前にパターンが出てきた場所にマッチ
　(?<!パターン)　否定の後読み　 この前にパターンが出てこなかった場所にマッチ