Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
    
    ...
        
        print join(' ', sort {$a <=> $b} keys %values), "\n";
    }
    
  2. or download this
    3 4 11 12 13
    7 8 9