Hi,

FWIW as a novice I'm doing something like this:

use CGI;

$qw =new CGI;

my $text1 = $qw->param('text1');
my $text2 = $qw->param('text2');
#and on and on

####Insert validation so you don't put dangerous code into your file

#stuff all of the text you want to print out into one variable and for
+mat into nice Perl
my $pageoutput = "\$text1 = \"$text1\"\;
\$text2 = \"$text2\"\;1;";

open(INFO, ">>testing123.txt"); # Open for appending
print INFO "$pageoutput";
close (INFO);
[download]

Then you can just require this into another script.

Hope this helps.

Best wishes

Sid