Help for this page
foreach my $file (sort {$a <=> $b} keys %hash) { print "$key \n"; }
perl -e 'print qq{[$_]\n} for ( sort { $a <=> $b } qw(file1 file10z fi +le11s file2q file20z file21f) )'
www.com | www.net | www.org
No recent polls found
