Lines Matching refs:d
700 "delimiter|d=s" => \$opt::d,
841 if(defined $opt::d) { my $e="sprintf \"$opt::d\""; $/ = eval $e; }
1959 $eta = sprintf("ETA: %ds Left: %d AVG: %.2fs ",
1985 sprintf("%s:%d/%d/%d%%/%.1fs ",
2001 sprintf("%s:%d/%d/%d%%/%.1fs ",
2012 { sprintf("%s:%d/%d/%d%%",
2026 { sprintf("%s:%d/%d/%d%%",
2040 { sprintf("%s:%d/%d",
2050 { sprintf("%s:%d/%d",
2060 { sprintf("%s:%d/%d",
2070 { sprintf("%s:%d",
2080 { sprintf("%s:%d",
2135 sprintf("%d%% %d:%d=%ds %s",
5820 my $d = shift;
5822 while($d =~ s:/[^/]+$::) {
5823 if($d ne ".") {
5824 push @parents, $d;
7707 -d $parallel_dir or mkdir_or_die($parallel_dir);
7709 -d $parallel_locks or mkdir_or_die($parallel_locks);
7733 for my $d (glob "$lockdir/*") {
7734 ::debug("sem", "Lock $d $lockdir\n");
7735 $d =~ m:$lockdir/([0-9]+)\@([-\._a-z0-9]+)$:o or next;
7739 ::debug("sem", "Dead: $d");
7740 unlink $d;
7742 ::debug("sem", "Alive: $d");
7810 -d $self->{'lockdir'} or mkdir_or_die($self->{'lockdir'});
7831 -d $self->{'lockdir'} or mkdir_or_die($self->{'lockdir'});
7925 -d $ddir and next;