#!/usr/bin/perl use strict; use warnings; use CGI; my $cgi = CGI->new; my %Form = $cgi->Vars;