Select Code to Download

my ($last, $penultimate) = reverse split " ", $line;

my ($last, $penultimate) = reverse split for $line;