On 9/10/2007 5:13 PM, Rob Dixon wrote:
use List::Util qw/max/;

my %hash = (x => [ 'a','b','c' ],
           y => [ 'd','e' ],
           z => [ 'f' ],
          );


my $most = max map scalar @$_, values %hash;


Woah!  That's fast! :)

thanks,


--

Jeremy Kister
http://jeremy.kister.net./

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to