$ perl -le'
    $_ = "\xc2\xa0";
    print /^\h$/ ? "h" : "not h";
'
not h