Help for this page

Select Code to Download

Select or download this

$\ = "\n";

...
sub { @_=('foo(@_)');     foo(@_);     }->();
sub { @_=('goto $ref');   goto $ref;   }->();
sub { @_=('goto &$ref');  goto &$ref;  }->();