Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
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 cooling their heels in the Monastery: (8)
As of 2016-02-07 11:00 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How many photographs, souvenirs, artworks, trophies or other decorative objects are displayed in your home?





    Results (250 votes), past polls