Lines Matching refs:pwd
302 chop($pwd = `pwd 2>/dev/null`);
303 die "$prog: couldn't get current working directory\n" if $pwd eq '';
304 die "$prog: couldn't cd to $pwd - $!\n" if !chdir($pwd);
307 $test_prog = "$pwd/$test_prog" if substr($test_prog, 0, 1) ne '/';
644 if (!chdir($pwd)) {
645 print STDERR "$prog: couldn't cd to $pwd - $!\n";