If I run the code at the bottom from the command line eg
perl -T test.pl test=-
I get an Insecure dependency in require... error at line 533 of CGI.pm
If I instead use CGI qw/:standard/ (and remove all the $cgi->'s), the error goes away
If I remove the radio group from the example code, the error goes away
If I run the code from a web server and click the "+" button, I get the error, but running
perl -T test.pl test=+
from the command line does not produce the error
I have created a ticket in CGI.pm on cpan about this, and they suggested I ask here.
#!/usr/bin/perl -T use CGI; my $cgi = new CGI; print $cgi->header( -charset => 'utf-8' ), $cgi->start_html(), $cgi->start_form( -name => 'form' ), $cgi->table( $cgi->Tr( $cgi->td( $cgi->radio_group( -name => 'testradio', -values => [0..1], -labels => { 0 => 0, 1 => 1 }, -default => 0 ), ), $cgi->td( $cgi->submit( -name => 'test', -value => '+', ), ), ), ), $cgi->end_form, $cgi->end_html;
In reply to Spurious "Insecure dependency" error in CGI.pm by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |