Help for this page

Select Code to Download


  1. or download this
    print join (', '
          , sort {$a <=> $b || $a cmp $b}
            (2, 0, 1, 99, 'aaa', 'AAA', undef, 'ZZZ', 'zzz'))
          , "\n";
  2. or download this
    __OUTPUT__
, 0, AAA, ZZZ, aaa, zzz, 1, 2, 99