Help for this page

Select Code to Download

Select or download this

%h = ( map { $_ , $h{$_}; }
        sort { $a <=> $b }
          keys %h
     )[0,1] ;