Hi,
I've been having a problem with my web perl scripts since I upgraded from v
5.22 to 5.6 of ActiveState Perl. (Running on OmniHttpd as the web server on
NT4). As you can see below the action part of my form has been doubled up
(/ping.pl/ping.pl rather than /ping.pl). This used to work now I get this
error with all my scripts (both as .pl and .plx).
I have included a simple script I have and the resultant output to
demonstrate this. While I suspect the answer is simple I can't find it for
the life of me (or anything documented about it)
Does anyone know where I might be going wrong?
*******Start HTML**********
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US"><head><title>Ping a
computer!</title>
</head><body><h1>Ping a computer!</h1><form method="post"
action="/ping.pl/ping.pl" enctype="application/x-www-form-urlencoded">
Machine to ping: <input type="text" name="machine_name" /><p /><input
type="submit" name=".submit" /><hr /><p />
*******End HTML**********
*******Start Perl **********
$title = "Ping a computer!";
use CGI qw/:standard/;
print header,start_html($title),
h1($title),start_form,
"Machine to ping: ",textfield('machine_name'),p,
submit,hr,p;
if (param()) {
$computer = param('machine_name');
if ($computer ne "") {
@data = `ping $computer`;
print h1("Result:"),p;
for (@data)
{
print "$_<br>\n";
}
}
}
**********End Perl************
Regards
Tom Woodington
*********************************************************************
This footnote confirms that this e-mail message has been scanned for
the presence of known computer viruses by the MessageLabs Virus
Control Centre. However, it is still recommended that you use
local virus scanning software to monitor for the presence of viruses.
*********************************************************************
_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web
