Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW

Re: Substitution or removing characters from a file

by JavaFan (Canon)
on May 10, 2012 at 06:37 UTC ( #969753=note: print w/replies, xml ) Need Help??

in reply to Substitution or removing characters from a file

Sure, just remove the newline:
$basename =~ s/\S*RDL/RDL/; $basename =~ s/.ruv$//;
s/\S*RDL/RDL/, s/.ruv$// for $basename;
$basename =~ s/\S*RDL((?s:.*)).ruv$/RDL$1/;
but why would you? The two lines are easy to understand, and certainly more efficient that the latter single substitution.

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.
      It was me who posted above msg. Not sure, how I got logged out in the process before posting that msg.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://969753]
[GotToBTru]: have you looked on CPAN?

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (12)
As of 2017-02-22 19:01 GMT
Find Nodes?
    Voting Booth?
    Before electricity was invented, what was the Electric Eel called?

    Results (335 votes). Check out past polls.