Lines Matching refs:dfile

145 while ($dfile = pop(@dfiles)) {
146     print "Checking $dfile\n" if ($debug);
147     ($qfile = $dfile) =~ s/^d/q/;
148     ($xfile = $dfile) =~ s/^d/x/;
149     ($mfile = $dfile) =~ s/^df//;
156      $atime,$mtime,$ctime,$blksize,$blocks) = stat($dfile);
158 	print "$dfile is gone - skipping\n" if ($debug);
164 	printf ("%s is %d seconds old - skipping\n", $dfile, $now-$mtime) if ($debug);
169     if (-e "$queueB/$dfile") {
170 	print "$queueb/$dfile already exists - skipping\n" if ($debug);
196     if (! -e $dfile) {
207     if (link("$dfile", "$queueB/$dfile") == 0) {
209 	&syslog('err', 'link(%s, %s/%s): %s', $dfile, $queueB, $dfile, $bang);
210 	print STDERR "$0: link($dfile, $queueB/$dfile): $bang\n";
217 	unlink("$queueB/$dfile");
225 	    unlink("$queueB/$dfile");
240     if (unlink($dfile) == 0) {
242 	&syslog('err', 'unlink(%s): %s', $dfile, $bang);
243 	print STDERR "$0: unlink($dfile): $bang\n";
257     print "Done with $dfile $qfile\n\n" if ($debug);