in reply to How can I do this action WITHOUT split?
( my $final_string = $str_with_dash ) =~ s| ( [^.-] ) | $str_no_dash =
+~ / ( . ) /xsg && $1 |xeg;
1. Keep it simple
2. Just remember to pull out 3 in the morning
3. A good puzzle will wake me up
Many. I like to torture myself
0. Socks just get in the way
Results (350 votes). Check out past polls.