$x = 3 + undef;
printf "%s", undef;
undef =~ /./;