#!/usr/bin/perl -w

use strict;
sub url_decode { # capture the values from the URL command line
    my $text = shift();
    $text =~ tr/\+/ /; # substitute the + for spaces
    $text =~ s/%([a-f0-9][a-f0-9])/chr( hex( $1 ) )/eg; # clean up URL string

use CGI;

# set my paramenters
my $q = new CGI;
my $candidate = $q->param('candidate');
my $position = $q->param('position');
my $education = $q->param('education');

# send the values from my URL command line to the dataform.html to be added and appended:

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;