regex - perlで分割基準を分割して保持する方法

Question

次のような文字列があるとします

mother-in-lawmother、出力-に、、、、、inのような 5 つのトークンが必要-ですlaw。

motherハイフンを基準に分割してみましたが、トークンは 3 つしか取得できませんでしin lawた。

Answer 1

分割正規表現にキャプチャ グループが含まれている場合、各キャプチャ グループの内容が によって返されsplitます。-区切り文字を保持するには、次のように記述します

split /(-)/, "mother-in-law"

それ以外の

split /-/, "mother-in-law"

Answer 2

/(-)/分割パターンとして使用:

print join(' ', split(/(-)/, 'mother-in-law'));

版画

mother - in - law

split-perldocによると:

PATTERN にキャプチャ グループが含まれている場合、区切り記号ごとに、グループによってキャプチャされた各部分文字列に対して追加のフィールドが生成されます。