my $p = new CGI;
my $name= $p->param('name');
my $password=$p->param('password');
my $st=$p->param('state');

$name =~ s/([;<>\*\|`\$!#\(\)\[\]\{\}:'"]@)/\\$1/g;
$name =~tr/\n//d;
$password =~ s/([;<>\*\|`\$!#\(\)\[\]\{\}:'"]@)/\\$1/g;
$password=~tr/\n//d;
if (( $name ne " ")&& ($password ne " ")&& ($st eq "true"))
{
do some stuff
}
else{
redirect back to form
}