Re^2: Regex Parsing Chars in a Line

Replies are listed 'Best First'.
Re^3: Regex Parsing Chars in a Line by swl (Prior) on Nov 26, 2019 at 07:00 UTC
Maybe you could avoid the regex approach and use split and join? `# untested my @parts = split /-/, $input; my $first = shift @parts; my $last = pop @parts; my $reassembled; # then $reassembled = $first . '-' . join ('_', @parts) . '-' . $last; # or something like this $reassembled = join '_', @parts; $reassembled = join '-', ($first, $reassembled, $last);` [download] The above assumes no CSV type quoting issues with embedded separators, for which a proper CSV parser like Text::CSV is needed.	[reply] [d/l]
Re^3: Regex Parsing Chars in a Line by AnomalousMonk (Archbishop) on Nov 26, 2019 at 08:38 UTC
I see a typo in my description ... If you have not already done so (I don't see any Update), you might consider updating the errant node to clarify the mistake. Please see How do I change/delete my post? Give a man a fish: `<%-{-{-{-<`	[reply] [d/l]