should bemap {s/\\://g;$_}
map { (my $s = $_) =~ s/\\(.)/$1/sg; $s }
Update: hum... The OP did show a lack of colons in the desired output. If that's truly what he wants,
should bemap {s/\\://g;$_}
map { my $s = $_; $s =~ s/\\(.)/$1/sg; $s =~ s/://g; $s }
In reply to Re^2: Easy Split
by ikegami
in thread Easy Split
by ropey
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |