Re^3: Crazy Golf : creating hex ranges from non-consecutive hex data values

Faster?

$ perl -le'
use Benchmark qw/ cmpthese /;
my @data = "a" .. "z";
cmpthese -4, {
    copy => sub { my @array; @array = ( @array, @data ) for 1 .. 10; r
+eturn @array },
    push => sub { my @array; push @array, @data for 1 .. 10; return @a
+rray },
    }
'
       Rate copy push
copy  908/s   -- -91%
push 9660/s 964%   --
[download]

Can you prove it?

Comment on Re^3: Crazy Golf : creating hex ranges from non-consecutive hex data values Download Code