my $query = CGI->new;
my $p = $query->param('VAR');
if (defined $p && $p ne "") { # To see if $p had non-null value
   # Do something
}