Lines Matching defs:dir
321 DIR *dir;
352 if (!(dir = PerlDir_open("."))) {
356 while ((dp = PerlDir_read(dir)) != NULL) {
399 PerlDir_close(dir);
401 if (PerlDir_close(dir) < 0) {
631 char *dir;
643 New(0,dir,MAXPATHLEN,char);
644 if (_getdcwd(drive, dir, MAXPATHLEN)) {
645 sv_setpv_mg(TARG, dir);
651 Safefree(dir);
731 SV *dir = sv_newmortal();
734 do_join(dir, SLASH_STRING_SV, &ST(0), &ST(items-1));
735 RETVAL = unix_canonpath(dir);
742 SV *file, *dir;
765 dir = POPs;
767 pv = SvPV(dir, len);
769 RETVAL = newSVsv(dir);
789 SV *dir = sv_newmortal();
792 do_join(dir, SLASH_STRING_SV, &ST(-1), &ST(items-1));
793 RETVAL = unix_canonpath(dir);