/* No stash in name, so see how we can default */
if (!stash) {
- if (isIDFIRST(*name)
- || (IN_UTF8 && ((*name & 0xc0) == 0xc0) && isIDFIRST_utf8((U8*)name)))
- {
+ if (isIDFIRST_lazy(name)) {
bool global = FALSE;
if (isUPPER(*name)) {
case '\017': /* $^O */
case '\020': /* $^P */
case '\024': /* $^T */
+ case '\025': /* $^U */
if (len > 1)
break;
goto magicalize;