in reply to How can I do this action WITHOUT split?
( my $final_string = $str_with_dash ) =~ s| ( [^.-] ) | $str_no_dash =
+~ / ( . ) /xsg && $1 |xeg;
There is no Extraterrestrial life
There aren't any suitably capable Extraterrestrials
Interstellar travel is too difficult
We're too uncool / not worth the trouble
What do you mean they haven't visited?
Results (519 votes). Check out past polls.