Beefy Boxes and Bandwidth Generously Provided by pair Networks Cowboy Neal with Hat
Just another Perl shrine
 
PerlMonks  

Re: remove both leading and trailing spaces

by perlmonkey (Hermit)
on Sep 26, 2003 at 06:16 UTC ( #294344=note: print w/ replies, xml ) Need Help??


in reply to remove both leading and trailing spaces

Yes, you can do s/^\s+|\s+$//g but it is definaly not optimized. It is generally preferred to use the two regexes, since it is roughly 3 times faster:

use Benchmark; my $val = " Smart Way "; timethese(1000000, { regex1 => sub { my $tmp = $val; $tmp =~ s/^\s+|\s+$//g; }, regex2 => sub { my $tmp = $val; $tmp =~ s/^\s+//; $tmp =~ s/\s+$//; } });
Results:
Benchmark: timing 1000000 iterations of regex1, regex2... regex1: 9 wallclock secs ( 6.43 usr + 0.02 sys = 6.45 CPU) @ 155038.76/s (n=1000000) regex2: 2 wallclock secs ( 2.65 usr + 0.00 sys = 2.65 CPU) @ 377358.49/s (n=1000000)


Comment on Re: remove both leading and trailing spaces
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://294344]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (7)
As of 2014-04-19 03:05 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (475 votes), past polls