C:\Renee>perl
my $s = '';
print "yes" if(defined($s));
^D
yes