Select Code to Download

#!/usr/bin/perl -w

...
  @file = sort { $a <=> $b } @file;
}

$perl myfile.pl -rn test.txt
# Reverse the contents of test.txt and perform
# a numeric sort on it.

# Sample runs:

...

C:\perl>