Help for this page
use Sort::Key::Multi 'ru_ru_keysort'; # sort by two unsigned keys in r +everse order use List::Util 'sum'; ... my $l = $scan->{$_}; (scalar(@$l), sum(@$l)) } keys %$scan;
www.com | www.net | www.org
No recent polls found