Select Code to Download

#!/usr/bin/perl

...
    print "Finally, we have $keys[-1].\n";
}

B:\>perl 11140865-single.pl
First is q ..
Finally, we have q.

B:\>