use CGI;
my $q = new CGI;
print $q->header( "text/html" );
if ( $q->param() )
{
if( $q->param( $name ) )
{
if( $q->param( $email ) )
{
if( exists $emails{$q->param( $email )} )
{
print "
Email already exists in database.\n";
}
else
{
$emails{$q->param( $email )} = "$info";
print "Your information was added to our system!\n";
}
} # you missed this closing brace
else
{
print "Email was missing";
exit;
}
}
else
{
print "Name was missing";
exit;
}
}