On Thu, 25 Oct 2001, Kevin Reid wrote:
> Simon Cozens wrote (on perl6-internals):
> > --
> > sub UNIVERSAL::AUTOLOAD{ $UNIVERSAL::AUTOLOAD =~ s/::/ /; print
> > "$UNIVERSAL::AUTOLOAD "}; hacker perl another just;
>
> That repetition feels awkward.
>
> $_ = q{sub {$=~s/::/ /;print"$"}},
> s/[b\$]/$& UNIVERSAL::AUTOLOAD /g,
> eval; hacker perl another just
>
Similar AUTOLOAD hackery:
package Just;*AUTOLOAD=*a;sub a{$a=~s/
::(.*)/print "$_[0] $1er "/xe} package
Perl;@ISA='Just'; Hack Perl Anoth Just;
David Wright
