Searched defs:unix (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dperl.c4412 char *unix; local
4415 if ((unix = tounixspec_ts(SvPV(libdir,len),Nullch)) != Nullch) {
4416 len = strlen(unix);
4417 while (unix[len-1] == '/') len--; /* Cosmetic */
4418 sv_usepvn(libdir,unix,len);

Completed in 23 milliseconds