Helper to coerce an object to character and return a single scalar
if possible. If the input has length not equal to 1 or is NA,
a default value is returned.
.scalar1_chr(x, default = NA_character_)A character scalar or default if extraction fails.
Object to be coerced to character.
Character scalar returned when a valid scalar cannot
be extracted (default is NA_character_).