Re: Substitution or removing characters from a file

Sure, just remove the newline:

$basename =~ s/\S*RDL/RDL/; $basename =~ s/.ruv$//;
[download]

s/\S*RDL/RDL/, s/.ruv$// for $basename;
[download]

$basename =~ s/\S*RDL((?s:.*)).ruv$/RDL$1/;
[download]

but why would you? The two lines are easy to understand, and certainly more efficient that the latter single substitution.

Comment on Re: Substitution or removing characters from a file Select or Download Code

Replies are listed 'Best First'.
Re^2: Substitution or removing characters from a file by Anonymous Monk on May 17, 2012 at 22:58 UTC
Hello, Thanks for the reply. Am late in acknowledging it, was on travel. Thanks for your above suggestions. You said that two lines are more efficient than the single substitution. How can I tell, which part of my code is more efficient than other. I thought that 1 line would be more efficient than 2 lines, hence I posted this question. You have any suggestion/reading link for reading on writing efficient code in perl? Thanks.	[reply]
Re^3: Substitution or removing characters from a file by hary536 (Novice) on May 17, 2012 at 23:02 UTC
It was me who posted above msg. Not sure, how I got logged out in the process before posting that msg.	[reply]


good chemistry is complicated, and a little bit messy -LW
	PerlMonks