Help for this page

Select Code to Download


  1. or download this
    %g2o = ( 128 => 'a',
             13 => 'b',
    ...
    @allgs = (128, 13, 34 );
    @allgsplane = sort { ($g2o{$a} cmp $g2o{$b}) || ($a <=> $b) } @allgs;
    print "@allgsplane\n";
    
  2. or download this
    34 128 13