Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

nested Safe->reval and method from custom Module

by jeremyh (Beadle)
on Sep 15, 2004 at 17:11 UTC ( #391245=perlquestion: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    my $compartment = new Safe;  # module level
    
    ...
             return 1;
        } );
    }
    
  2. or download this
    #!/usr/bin/perl -w
    
    ...
    $op = '>';
    # this doesn't print, throws error
    $compartment->reval( "print 'greater' if date_compare(\"$date1\",\"$op
    +\",\"$date2\")" );
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://391245]
Approved by tradez
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (10)
As of 2014-08-29 23:18 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (289 votes), past polls