thanks too all who replied. i knew i was close. i can't believe i missed the extra "
on line 7. duh. thanks everyone!
dan
* dan radom ([EMAIL PROTECTED]) wrote:
> I'm trying to print the contents of a file which is being passed from a html form.
>I'm pretty close (I think). Here's what I have...
>
> html form...
>
> <form method=post action="/cgi-bin/smsconfview.pl">
> Enter the hostname to view the configuraqtion file
> <br>
> <input size=50 name="host">
> <br><br>
> <input type ="submit" value="submit">
>
>
> perl script...
>
> #!/usr/local/bin/perl -w
> use CGI qw(:all);
> $s=CGI::param('host');
> $s = quotemeta($s);
> print header;
> print start_html();
> open(CONF, "/opt/disk4/REDBACK-BACKUP/$s") or die("configuration file not found")";
> @t=<CONF>;
> close(CONF);
> foreach (@t) { print "$_<BR>" };
> print end_html();
>
>
> Here are the errors...
>
> String found where operator expected at /usr/local/apache/cgi-bin/smsconfview.pl
>line 10, near "foreach (@t) { print ""
> (Might be a runaway multi-line "" string starting on line 7)
> (Missing semicolon on previous line?)
> syntax error at /usr/local/apache/cgi-bin/smsconfview.pl line 10, near "foreach (@t)
>{ print ""
> In string, @t now must be written as \@t at /usr/local/apache/cgi-bin/smsconfview.pl
>line 7, near ";
> @t"
> Scalar found where operator expected at /usr/local/apache/cgi-bin/smsconfview.pl
>line 10, near "foreach (@t) { print "$_"
> (Do you need to predeclare foreach?)
> Can't find string terminator '"' anywhere before EOF at
>/usr/local/apache/cgi-bin/smsconfview.pl line 10.
> httpd: [Thu Oct 18 14:47:10 2001] [error] [client 155.251.65.70] Premature end of
>script headers: /usr/local/apache/cgi-bin/smsconfview.pl
>
>
>
> Any suggestions?
>
> dan
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
