Help for this page

Select Code to Download


  1. or download this
    foreach my $file (sort {$a <=> $b} keys %hash) {
 print "$key \n";
}
  2. or download this
    perl -e 'print qq{[$_]\n} for ( sort { $a <=> $b } qw(file1 file10z fi
+le11s file2q file20z file21f) )'