if ( !defined($foo) or  $foo eq '' or $foo eq '?' ) { 
    print "\$foo OK!\n"; 
}