in reply to Perl Interpreter (5.8.5) initialization causes SIGSEGV in HPUX
dSAVE_ERRNO; const struct spwd * const spwent = getspnam(pwent->pw_name); RESTORE_ERRNO; [download]