Select Code to Download

$test->execute(
 { 
...
   die "The devil is in $test->name()! I can't live with that!"
     if $test->IsDevilPresent(); 
 } );

$test->execute(
 { 
...

#In the package, you must supply $self as an arg:
return &$coderef( $self );