my $var="null\n";chomp($var);if ($var="null"){print "Good";}