Lines Matching refs:subdir
3566 * Pass script name as "subdir" of fd, which perl will grok;
3676 /* (We pass script name as "subdir" of fd, which perl will grok.) */
4358 SV *subdir = Nullsv;
4364 subdir = sv_newmortal();
4436 Perl_sv_setpvf(aTHX_ subdir, "%"SVf PERL_ARCH_FMT_PATH PERL_ARCH_FMT,
4440 if (PerlLIO_stat(SvPVX(subdir), &tmpstatbuf) >= 0 &&
4442 av_push(GvAVn(PL_incgv), newSVsv(subdir));
4445 Perl_sv_setpvf(aTHX_ subdir, "%"SVf PERL_ARCH_FMT_PATH, libdir,
4448 if (PerlLIO_stat(SvPVX(subdir), &tmpstatbuf) >= 0 &&
4450 av_push(GvAVn(PL_incgv), newSVsv(subdir));
4453 Perl_sv_setpvf(aTHX_ subdir, "%"SVf PERL_ARCH_FMT, libdir, ARCHNAME);
4454 if (PerlLIO_stat(SvPVX(subdir), &tmpstatbuf) >= 0 &&
4456 av_push(GvAVn(PL_incgv), newSVsv(subdir));
4463 Perl_sv_setpvf(aTHX_ subdir, "%"SVf PERL_ARCH_FMT, libdir, *incver);
4464 if (PerlLIO_stat(SvPVX(subdir), &tmpstatbuf) >= 0 &&
4466 av_push(GvAVn(PL_incgv), newSVsv(subdir));