通常 split でパターンを指定して文字列をリストに分割すると、 パターンにマッチした部分はなくなってしまう。 パターンを含めてリストに分割したい場合は、先読みなどのゼロ幅のマッチで パターンを指定すればいい $str = '1,2,3,4,5'; @list = split(/(?=,)/, $str); # 次に","のある位置にマッチ @list は ("1", ",2", ",3", ",4", ",5") になる。 # 用途は…?