my $a;

if ( $a eq '' ) {
    print "it's the empty string";
}

# it's the empty string

if ( $a ) {
    print "it's true"
}
else {
    print "it's false"
}

# it's false
[download]