# Might need 'no warnings "uninitialized";' to be quiet.
$var = "?" unless length $var;
# Or... :P
$var = "?" unless defined $var and length $var;