Lines Matching refs:collectors
3691 my %collectors = @_;
3696 if ($collectors{"BEFORE"}) {
3697 $collectors{"BEFORE"}->($_);
3699 foreach my $re (keys %collectors) {
3701 $collectors{$re}->($lineiterator);
3705 if ($collectors{"OTHERWISE"}) {
3706 $collectors{"OTHERWISE"}->($lineiterator, $_)
3707 unless $found || !defined $collectors{"OTHERWISE"};
3709 if ($collectors{"AFTER"}) {
3710 $collectors{"AFTER"}->($_);