X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FRBN.pm;h=c968d4c8d56cc4f6f0c01b4ee5c8567837a01e35;hb=6ad88bbfb0403ca727ee7ec63eb21c1b153455cc;hp=2e35956a398a75a01ee4ec64d61f43cd42a2cb1d;hpb=907be6e0c64e1e0c26ace93f8abeb54769e51765;p=spider.git diff --git a/perl/RBN.pm b/perl/RBN.pm index 2e35956a..c968d4c8 100644 --- a/perl/RBN.pm +++ b/perl/RBN.pm @@ -541,7 +541,7 @@ sub process # At this point we run the queue to see if anything can be sent onwards to the punter my $now = $main::systime; my $ta = [gettimeofday]; - my $items 0; + my $items = 0; # now run the waiting queue which just contains KEYS ($call|$qrg) foreach my $sp (keys %{$dxchan->{queue}}) {