Perlコーディング初心者質問スレ Part 59

[0653 nobodyさん 2009/06/16(火) 16:23:50 ID:???]

なんでわざわざ正規表現使うんだ？
$str = sprintf '%s/%s/%s-%s', split '．', $str;

これでいいだろ
汎用性も十分