Lines Matching defs:pathstr
419 char pathstr[MAX_PATH+1];
431 sprintf(pathstr, "%s/%s/lib", libname, pl);
432 (void)get_emd_part(&sv1, NULL, pathstr, ARCHNAME, "bin", pl, NULL);
441 sprintf(pathstr, "%s/lib", libname);
442 (void)get_emd_part(&sv2, NULL, pathstr, ARCHNAME, "bin", pl, NULL);
4346 char *pathstr;
4364 pathstr = PerlEnv_getenv("PATH");
4368 Newx(fullcmd, (pathstr ? strlen(pathstr) : 0) + cmdlen + 6, char);
4402 if (!pathstr || !*pathstr || has_slash)
4406 while (*pathstr == ';')
4407 pathstr++;
4411 while (*pathstr && *pathstr != ';') {
4412 if (*pathstr == '"') { /* foo;"baz;etc";bar */
4413 pathstr++; /* skip initial '"' */
4414 while (*pathstr && *pathstr != '"') {
4415 *curfullcmd++ = *pathstr++;
4417 if (*pathstr)
4418 pathstr++; /* skip trailing '"' */
4421 *curfullcmd++ = *pathstr++;
4424 if (*pathstr)
4425 pathstr++; /* skip trailing semi */