Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Size of a HASH (with more keys)

by choroba (Chancellor)
on Jul 02, 2014 at 12:02 UTC ( #1091973=note: print w/replies, xml ) Need Help??


in reply to Size of a HASH (with more keys)

Use keys in scalar context:
my $count = keys %{ $testHash{$year} }

It might be better not to output the comma, though. Just invert the logic and print it before each sequence except the first one which is easy to detect:

my $first = 1; while (...) { print ',' unless $first; undef $first; print "..."; # print the sentence }
لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Replies are listed 'Best First'.
Re^2: Size of a HASH (with more keys)
by David92 (Sexton) on Jul 02, 2014 at 12:30 UTC
    I tried using your suggestion, but it didnt work. I am onto debugging, if something's wrong before with the Hash.