if ($var =~ /^\s*$/) {
   # do something
}