Re: Single CGI script for submission,processing and displaying of results

in reply to Single CGI script for submission,processing and displaying of results

Hm. I'm not quite sure exactly what you are asking. Are you asking how to use a single script, that when invoked the first time displays the form, but on subsequent invocations adds the data from the previous submission to the current one? (whew!)

For example, consider a form with a single input box. When the user enters something and submits it, the form is returned with the data intact, allowing him to add another chunk of text to it? Something like this?

use strict; 
use CGI; 
 
my $cgi=new CGI; 
 
sub doform { 
  my $text=$cgi->param("text"); 
 
  print $cgi->header; 
  print "<html><body>"; 
  print "Accumilating data: $text<P>"; 
  print "<form method=post>"; 
  print "<input type=text name=newtext>"; 
  print "<input type=hidden name=text value=\"\Q$text\E\""; 
  print "</form>"; 
  print "</body></html>\n"; 
} 
 
$cgi->param("text",$cgi->param("text").$cgi->param("newtext")) if defi
+ned $cgi->param("newtext"); 
 
doform;
[download]

Comment on Re: Single CGI script for submission,processing and displaying of results Download Code

In Section Seekers of Perl Wisdom