Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: One line dynamic run-parts warpper

by ww (Bishop)
on Dec 16, 2013 at 22:48 UTC ( #1067381=note: print w/ replies, xml ) Need Help??


in reply to One line dynamic run-parts warpper

Before removing the pragmas, benchmark! The received wisdom is: "Removing strict and warnings is unlikely to contribute significantly (parts per m, maybe) to 'making it faster.'"

If I've misconstrued your question or the logic needed to answer it, I offer my apologies to all those electrons which were inconvenienced by the creation of this post.


Comment on Re: One line dynamic run-parts warpper
Re^2: One line dynamic run-parts warpper
by tobyink (Abbot) on Dec 17, 2013 at 11:48 UTC

    Given the following script:

    use strict; use warnings; 1;

    Commenting out the pragmas, it seems to run in about 0.004 seconds on this machine. Commenting out just use warnings, about 0.008 seconds. With both pragmas enabled, about 0.024 seconds.

    This "slow down" seems pretty imperceptible unless you're running the script several times per second. (And in that case, a better speed boost could be had by just running it once, as a persistent process.)

    For comparison, a similar script in Ruby takes around 0.080 seconds; in Python, around 0.050 seconds; in PHP, around 0.040 seconds; in bash, around 0.008 seconds; and in tcsh, around 0.020 seconds.

    use Moops; class Cow :rw { has name => (default => 'Ermintrude') }; say Cow->new->name

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (10)
As of 2014-10-22 21:52 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (122 votes), past polls