Re^2: Checking to see if Taint mode is enabled


Syntactic Confectionery Delight
	PerlMonks

Re^2: Checking to see if Taint mode is enabled

by Burak (Chaplain)

on Mar 17, 2007 at 12:23 UTC ( [id://605271]=note: print w/replies, xml )

Need Help??

in reply to Re: Checking to see if Taint mode is enabled
in thread Checking to see if Taint mode is enabled

You have to use that new global inside an eval for backwards compatibility:

sub is_tainted {
   my $taint;
   if ( $] >= 5.008 ) {
      $taint = eval '${^TAINT}';
   }
   else {
      # some work around ...
   }
   $taint;
}
[download]

Comment on Re^2: Checking to see if Taint mode is enabled Download Code

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://605271]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others drinking their drinks and smoking their pipes about the Monastery: (6)

As of 2024-04-23 07:57 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found