in reply to getpwnam(@_) ???

It has a prototype that causes the argument to be evaluated in scalar context.

$ perl -E'say prototype("CORE::getpwnam")' $