Re: regex to rename last _ with ,

[choroba]

If you know how to replace the first underscore with a comma, just add reverse:

$file = reverse $file;
$file =~ s/_/,/;
$file = reverse $file;

To get back what's after the inserted comma, the following should work:

$file =~ s/_([^_]*)/,$1/;
my $rest = $1;

[ArifS]

it was that easy!.... thank you.