Done - Nice and simply

Yeah, just tried this and it prints:
Reversed arguments: gemima.txt fred.txt
in response to:
perl ./exercise1.pl fred.txt gemima.txt