$ perl -e'print "\xc2\xa0"' | perl -le' binmode STDIN, ":encoding(UTF-8)"; chomp( $_ = ); print /\s/ ? "space" : "no space"; ' space