Probably $IN->param('Country') input isn't correct, of there is no input at all. Do you have that input parameter passed from other page?
Try setting it to a fixed value:
Also did you try to look at the generated html code?
Can't help debugging until you don't give us more info.
Furthermore add this code before the return line:
$Data::Dumper::Indent = 1;
$Data::Dumper::Terse = 1;
print $IN->header();
print "<br>\n hash: " . Dumper(\%hash) . "\n";
print "<br>\n form_names_array_ref: " . Dumper(\$form_names_array_ref) . "\n";
print "<br>\n form_values_array_ref: " . Dumper(\$form_values_array_ref) . "\n";
List the printed debug values from the top of the page, and the generated html form...
Best regards,
Webmaster33
Paid Support from Webmaster33. Expert in Perl programming & Gossamer Threads applications. (click here for prices)
Webmaster33's products (upd.2004.09.26) | Private message | Contact me | Was my post helpful? Donate my help...
Try setting it to a fixed value:
Code:
value => "uk",Also did you try to look at the generated html code?
Can't help debugging until you don't give us more info.
Furthermore add this code before the return line:
Code:
use Data::Dumper; # Used for script debugging $Data::Dumper::Indent = 1;
$Data::Dumper::Terse = 1;
print $IN->header();
print "<br>\n hash: " . Dumper(\%hash) . "\n";
print "<br>\n form_names_array_ref: " . Dumper(\$form_names_array_ref) . "\n";
print "<br>\n form_values_array_ref: " . Dumper(\$form_values_array_ref) . "\n";
List the printed debug values from the top of the page, and the generated html form...
Best regards,
Webmaster33
Paid Support from Webmaster33. Expert in Perl programming & Gossamer Threads applications. (click here for prices)
Webmaster33's products (upd.2004.09.26) | Private message | Contact me | Was my post helpful? Donate my help...