I am trying to use an html script that will select an expect script, run it
and display the output as text back into the html page. I get a very brief
box showing up, it is so fast I am not sure what is in it. The expect script
is very slow to execute so it will require time.  The error_log shows
"GET" / HTTP/1.1" 304 -   and nothing else

Helen

<html>
<head>
<title>test the select option</title>
</head>
<body>
<h1>select advanced option</h1>
<hr>
<form action="../cgi-bin/run_advanced.pl" method="get">
this form makes it possible to display expect scripts<br>

what script would you like to run:
<SELECT NAME="advanced" size=1>
 <OPTION>telnet_term_ACQ_TM.exp
 <OPTIOn>telnet_term_BB0_GCOUNT.exp
 <OPTION>telnet_term_BB0_NMSU.exp
 <OPTION>telnet_term_pCOUNT.exp
 <OPTION>telnet_term_BB1.exp
 <OPTION>telnet_term_BB1_info.exp
  <OPTION>telnet_term_tu_status.exp
</SELECT>
<p>
<input type="submit" value="submit the form">
<input type="reset" value="clear all fields">
</form>
<hr>
</body>
<html>


#! /usr/bin/perl

use strict;
use warnings;

print "Content-type: text/exp\n\n;

$rxvt;

parse_form_data (select_advanced);
$NAME = $select_advanced {'NAME'};
$NAME;

else die;


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to