Lines Matching refs:collectors
3523 my %collectors = @_;
3528 if ($collectors{"BEFORE"}) {
3529 $collectors{"BEFORE"}->($_);
3531 foreach my $re (keys %collectors) {
3533 $collectors{$re}->($lineiterator);
3537 if ($collectors{"OTHERWISE"}) {
3538 $collectors{"OTHERWISE"}->($lineiterator, $_)
3539 unless $found || !defined $collectors{"OTHERWISE"};
3541 if ($collectors{"AFTER"}) {
3542 $collectors{"AFTER"}->($_);