Select Code to Download

#!/usr/bin/perl -w
print join(" ", reverse split /\s/), "\n" for (reverse <STDIN>);