my @arr1 = qw( one two ); my @arr2 = qw( foo bar baz qux ); my @arr3 = qw( just another hacker ); print join( ', ', biggest_array(\@arr1, \@arr2, \@arr3) ); sub biggest_array { map { @$_ } ( sort { @$b <=> @$a } @_ )[0] }
In reply to Re: finding the biggest array
by Anonymous Monk
in thread finding the biggest array
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |