Re: Substitution or removing characters from a file


The stupid question is the question not asked
	PerlMonks

by JavaFan (Canon)

on May 10, 2012 at 06:37 UTC ( [id://969753]=note: print w/replies, xml )

Need Help??

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]

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://969753]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others studying the Monastery: (4)

As of 2024-04-19 04:26 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

No recent polls found