D
Doc
Hi,
I have the test script (bottom) which works fine if you invoke it from
the HTML form at:
http://www.learnitfirm.com/LearningResources/HTML/Resources/SampleForm.htm
If I run SampleForm.htm from my C: drive or even from another web
server (changing the action property to
action="http://www.learnitfirm.com/bin/printvars.cgi")
the script runs (showing "Thank you") but no data is listed.
Please tell me I am missing something simple - any ideas folks?
Thanks
##### printvars.cgi below #########
#!/usr/local/bin/perl
use CGI qw
standard);
use CGI::Carp qw(warningsToBrowser fatalsToBrowser);
use strict;
print header;
print start_html("Thank You");
print h2("Thank You");
my %form;
foreach my $p (param()) {
$form{$p} = param($p);
print "$p = $form{$p}<br>\n";
}
print end_html;
I have the test script (bottom) which works fine if you invoke it from
the HTML form at:
http://www.learnitfirm.com/LearningResources/HTML/Resources/SampleForm.htm
If I run SampleForm.htm from my C: drive or even from another web
server (changing the action property to
action="http://www.learnitfirm.com/bin/printvars.cgi")
the script runs (showing "Thank you") but no data is listed.
Please tell me I am missing something simple - any ideas folks?
Thanks
##### printvars.cgi below #########
#!/usr/local/bin/perl
use CGI qw
standard);use CGI::Carp qw(warningsToBrowser fatalsToBrowser);
use strict;
print header;
print start_html("Thank You");
print h2("Thank You");
my %form;
foreach my $p (param()) {
$form{$p} = param($p);
print "$p = $form{$p}<br>\n";
}
print end_html;