map{ utf8::decode($_); # Try to decode the string from UTF8 # If it fails, it leaves  (\xC2) characters m/([^Â])/g # So match each character except for  } qq(The string)