in reply to Performance of Perl references

In order to test, I created a simple sort subroutine inside the Benchmark::timeit call. I've bumped the $count up to 2000 to really get some decent feedback.

I would tend to multiply the value of $count by 50 to a 100 or more. 3 seconds is barely enough time to compare anything. 0.39 seconds difference in CPU time is mere noise.

Remember that a difference of 5 to 10 percent in benchmark performance can also be considered noise. Hence you would want to see 30 seconds vs. 35 seconds (for example) in order to conclude a real (although minor) difference. 30 seconds vs. 75 seconds... now you're starting to talk about something interesting.


print@_{sort keys %_},$/if%_=split//,'= & *a?b:e\f/h^h!j+n,o@o;r$s-t%t#u'