Help for this page

Select Code to Download


  1. or download this
    print {$OUT} map "@$_\n", sort { $a->[10] cmp $b->[10] } @out;
  2. or download this
    {
  local $" = "\t";
  print $OUT map "@$_\n", sort { $a->[10] cmp $b->[10] } @out;
}