Perl_warner(aTHX_ WARN_SYNTAX, "%s (...) interpreted as function",name); } }