undef  ""   0
defined $s  偽   真   真
$s ne ""   警告  偽   真
$s         偽   偽   偽