padmy names may begin with a non-alnum. I think

diff --git a/indirect.xs b/indirect.xs
index 7c0144689d9106519b44b62882a6749bdfb495db..e144b02a4febf353155eefc2f432ba7734c5cf4d 100644 (file)
--- a/indirect.xs
+++ b/indirect.xs
@@ -225,8 +225,6 @@ STATIC OP *indirect_ck_padany(pTHX_ OP *o) {
   if (*s == '$' && ++s <= t) {
    while (s < t && isSPACE(*s)) ++s;
    while (s < t && isSPACE(*t)) --t;
-   if (!isALPHA(*s))
-    return o;
    sv = sv_2mortal(newSVpvn("$", 1));
    sv_catpvn_nomg(sv, s, t - s + 1);
    indirect_map_store(o, s, sv);