$ perl -le '$_ = "blort";if (/^\s*$/) { print "always matches" } else { print "Orly?" }'
Orly?