Select Code to Download

#!/usr/bin/perl -w

use strict;

$form_data = $ENV{'QUERY_STRING'};

...
($form_name, $candidate) = split (/=/, $fields[0]);
($form_name, $position) = split (/=/, $fields[1]);
($form_name, $education) = split (/=/, $fields[2]);

use CGI;

...
my $candidate = $q->param('candidate');
my $position = $q->param('position');
my $education = $q->param('education');

$form_name > dataform.html

open(OUT, "> dataform.html") or die "Can't open file: $!";
print "Candidate: $candidate\n";
print "Position: $position\n";
print "Education: $Education\n\n";
close OUT;