Hi all,
I'm just testing Graham Barr's Scalar::Util module. This module
exports a function tainted(), which allows a boolean test whether or
not a variable is tainted.
On a Unix machine, the following two tests should be ok, when run
with the -T switch:
my $key = (keys %ENV)[0];
$var = $ENV{$key};
print "not " unless tainted($var);
print "ok 3\n";
print "not " unless tainted($ENV{$key});
print "ok 4\n";
Under MacPerl, these tests are not ok. An environment variable
seems not to be tainted. Is this assumption true? In the docs I can't
find any information on this topic.
Any pointers/ideas are much appreciated.
Thanks.
Best regards,
--Thomas
_________________________________________________________
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com
