Searched refs:privdir (Results 1 - 1 of 1) sorted by relevance
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ |
H A D | perl.c | 4261 SV * privdir = NEWSV(55, 0); local 4267 Perl_sv_setpvf(aTHX_ privdir, "%slib:", macperl); 4268 if (PerlLIO_stat(SvPVX(privdir), &tmpstatbuf) >= 0 && S_ISDIR(tmpstatbuf.st_mode)) 4269 incpush(SvPVX(privdir), TRUE, FALSE, TRUE); 4270 Perl_sv_setpvf(aTHX_ privdir, "%ssite_perl:", macperl); 4271 if (PerlLIO_stat(SvPVX(privdir), &tmpstatbuf) >= 0 && S_ISDIR(tmpstatbuf.st_mode)) 4272 incpush(SvPVX(privdir), TRUE, FALSE, TRUE); 4274 SvREFCNT_dec(privdir);
|
Completed in 28 milliseconds