]$ perl -wMstrict -e 'if( my ($test) = undef ) { print "Passed"; } else { print "Failed"; }'
Passed

]$ perl -wMstrict -e 'if( my $test = undef ) { print "Passed"; } else { print "Failed"; }'
Failed