http://www.perlmonks.org?node_id=1067381


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.

Replies are listed 'Best First'.
Re^2: One line dynamic run-parts warpper
by tobyink (Canon) 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