I would like to combine these two Perl substitutions
into a single command, just like sed can do:Code:my $name = $file; $name =~ s/.out$//; $name =~ s/^nmr//;
I know that Perl was meant to mimic the way that sed works, but it doesn't work *exactly* the same.Code:sed -e 's/^nmr//g' -e 's/out$//g'
The program I have now works, but I would like to make it better.
Thanks very much!