Lines Matching refs:path

74 	my $path = $_;		# we'll be modifying it, so break the alias
75 	if ($path eq '') {
80 	$path = _nativize($path);
82 	if (-e $path && ! -d _) {
86 	unshift(@INC, $path);
91 		? File::Spec->catdir( $path, $incver )
92 		: "$path/$incver";
95 	# Put a corresponding archlib directory in front of $path if it
96 	# looks like $path has an archlib directory below it.
98 	    = _get_dirs($path);
115 	my $path = _nativize($_);
118 	    = _get_dirs($path);
119 	++$names{$path};