in reply to 'constant' vs array

but a little reading (on google) about using constants seems to indicate that is very little speed improvement.

It very much depends upon what you are doing with them.

For example:

use constant BOOL => 0; our $BOOL = 0; cmpthese -1,{ const => q[ for(1..1e6){ if(BOOL){ my $n = 1; $n *=$_ for 1 .. 1000; } } ], var => q[ for(1..1e6){ if($BOOL){ my $n = 1; $n *=$_ for 1 .. 1000; } } ] };; Rate var const var 15.1/s -- -22% const 19.4/s 29% --

Note: The code inside the if block isn't executed in either case; but in the variable version, the value of $BOOL has to be tested every time around the loop in case it changes.

But with the constant, Perl can see that the value cannot change, so it optimises away the entire if statement; so that 29% performance gain comes simply from not having to test a value that will never change 1e6 times.

If you want to know what difference your use will make don't ask for opinions; benchmark it.

Some you'll gain, some you won't; but you'll never loose.


With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.