It looks to me like the major case where the benchmark straight-out lies (well, where you, the speaker, presumably lie about what it's saying) is that the first snippet is in list context, and the second is in void context. Simply adding my @results = before the initial (in lexical order; final in execution order) map would fix that, and still have it fit on your slide (assuming your slide uses a monospaced font). You could probably even write it on a sepperate line and still have it fit on the slide.
The rest of the changes make the benchmark more useful, perhaps, but they do not unfairly favor one over the other -- the most important type of error to avoid in any benchmark. (The reason, for example, that polls should rotate the options -- there's a significant bias amongst voters for the first option listed on a form.)
Warning: Unless otherwise stated, code is untested. Do not use without understanding. Code is posted in the hopes it is useful, but without warranty. All copyrights are relinquished into the public domain unless otherwise stated. I am not an angel. I am capable of error, and err on a fairly regular basis. If I made a mistake, please let me know (such as by replying to this node).
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.