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

    use autobox SCALAR => 'Print';

    package Print;

    sub print {print $_[0], "\n"};

    1;

    "Just Another Perl Hacker"->print();

    __END__


##</code><code>##

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


##</code><code>##

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


##</code><code>##

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