Select Code to Download

    #!/usr/bin/perl5.8.1-autobox -w

...

    __END__

    $ ./autobox.pl 
    It's Perl Jim, but not as we know it.

    perl5.8.1-autobox -Mautobox="SCALAR,Print" -MPrint -e '"Just Anoth
+er Perl Hacker"->print()'

    my $schwartzian = [ @_ ]->map(...)->sort(...)->map(...);