Lines Matching refs:dir
19 $dir = $ARGV[0];21 if (! -d $dir) {22 print STDERR "$dir is not a directory\n";32 $indexname="$dir/$indexprefix$vol.html";37 opendir(dir, "$dir") || die "Can't open $dir";53 foreach $file (sort readdir dir) {55 open(file, "<$dir/$file") || die "Can't open $dir/$file";96 closedir dir;