Re: Re:x2 Counting keys with defined or undefined elements in a hash


XP is just a number
	PerlMonks

Re: Re:x2 Counting keys with defined or undefined elements in a hash

by jsprat (Curate)

on Jun 05, 2003 at 18:46 UTC ( [id://263453]=note: print w/replies, xml )

Need Help??

in reply to Re:x2 Counting keys with defined or undefined elements in a hash
in thread Counting keys with defined or undefined elements in a hash

I msg'd you, but you weren't around, so I'll post here.

The benchmark isn't benchmarking the giant hash - the parameter being passed to the sub is not what you think it is (which explains the amazing speed)! Just use %h directly in the sub to see the difference.

Try using this modified sub by_for to show how the parameters are being passed:

sub by_for {
    my $h = shift;
    die scalar keys %$h unless scalar keys %$h;
    my @def;
    $def[ defined $_ ? 1 : 0]++ for values %$h;
    @def;
}
[download]

It dies when the benchmark is run.