Help for this page

Select Code to Download


  1. or download this
    tie $somecode, CodeNRef => qq{print "This is my code\n"};
$somecode->( );
print tied $somecode;
  2. or download this
    package CodeNRef;

...
}

1;
  3. or download this
    package CodeNRef;

...
sub call { shift()->{compiled} }

1;