use Filter::BackslashS; print "\xA0" =~ /\s/ ? "Yay!\n" : "Hmmm\n";