Lines Matching refs:dirname

500 	my $dirname = object_to_dir_name($file);
501 	my $dirpath = "$working_dir/$dirname";
577 	print $index_fh "$file => $dirname\n";
608 	my $dirname;
610 		foreach $dirname (split(/:/, $ENV{'LD_LIBRARY_PATH'})) {
611 			if (! exists($ldpath{$dirname})) {
612 				push(@orig, $dirname);
613 				$ldpath{$dirname} = 1;
625 			$dirname = dirname($path);
626 			next if (exists($ldpath{$dirname}));
633 			next if ($dirname =~ /:/);
636 				if (! exists($ldpath{$dirname})) {
637 					push(@add_product, $dirname);
638 					$ldpath{$dirname} = 1;
645 		foreach $dirname (split(/:/, $solaris_library_ld_path)) {
646 			if (! exists($ldpath{$dirname})) {
647 				push(@add_solaris, $dirname);
648 				$ldpath{$dirname} = 1;