my $file = $q->param('file');
Are you sure the $file exist on your system actually?
open (FOO, ">temp1");
Under CGI,you maybe always need to specify a full path to the file.Maybe you
would write:
open Foo,">/your/path/temp1" or die $!;
while (<$file>)
Before reading,you should open the $file at first.And,the full path to the
$file is important.
`/usr/bin/xxx temp1`;
The same,where is the temp1?Does your webserver has the privileges to
access/write it?
At last,the most important thing to debug a program under CGI is that you
should always take a look at webserver's error_log.From error_log you should
find most of problems happened with you.And,add 'use strict' at the begin of
your script please.
--Jeff Peng
http://pobox.com/~jeffpeng
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
