NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.
All the Perl that's Practical to Extract and Report
Stories, comments, journals, and other submissions on use Perl; are Copyright 1998-2006, their respective owners.
what about multiple values? (Score:1)
E:\>perl - 1=a 1=b 1=c 1=d
use CGI qw[ param Vars ];
use CGI::Untaint;
my $u = CGI::Untaint->new( Vars() );
print "$_\n" for $u->extract(-as_printable => 1);
warn 1;
print "$_\n" for param(1);
__END__
1 at - line 5.
a
b
c
d
Re:what about multiple values? (Score:1)
I was talking about the 1st, CGI::Untaint (obviously). I think it does hit the hammer, but not exactly on the head :)(face maybe, shoulder?)
Reply to This
Parent