Lines Matching refs:dir_name
772 my $dir_name= $p_dir;
818 $name= $dir_name; # $File::Find::name
819 $_= ($no_chdir ? $dir_name : $dir_rel ); # $_
858 $dir_name = "$dir_name:" unless ($dir_name =~ /:$/);
861 $dir= $dir_name; # $File::Find::dir
864 unless (opendir DIR, ($no_chdir ? $dir_name : $File::Find::current_dir)) {
865 warnings::warnif "Can't opendir($dir_name): $!\n";
871 push @Stack,[$CdLvl,$dir_name,"",-2] if $post_process;
913 [$CdLvl,$dir_name,$FN,$sub_nlink];
940 die "Can't cd to $dir_name" . $tmp
948 $dir_name = "$p_dir$dir_rel";
949 $dir_pref = "$dir_name:";
952 $dir_name = ($p_dir =~ m|\w:/$| ? "$p_dir$dir_rel" : "$p_dir/$dir_rel");
953 $dir_pref = "$dir_name/";
956 $dir_name = ($p_dir eq '/' ? "/$dir_rel" : "$p_dir/$dir_rel");
957 $dir_pref = "$dir_name/";
966 $name = $dir_name;
980 $_ = ($no_chdir ? $dir_name : $dir_rel );
1010 my $dir_name = $p_dir;
1068 $name= $dir_name; # $File::Find::name
1069 $_= ($no_chdir ? $dir_name : $dir_rel ); # $_
1100 $dir_name = "$dir_name:" unless ($dir_name =~ /:$/);
1103 $dir = $dir_name; # $File::Find::dir
1137 push @Stack,[$new_loc,$updir_loc,$dir_name,$FN,1];
1154 $dir_name = "$p_dir$dir_rel";
1155 $dir_pref = "$dir_name:";
1159 $dir_name = ($p_dir eq '/' ? "/$dir_rel" : "$p_dir/$dir_rel");
1160 $dir_pref = "$dir_name/";
1171 $name = $dir_name; # $File::Find::name
1185 $_ = ($no_chdir ? $dir_name : $dir_rel); # $_