File Coverage

blib/lib/BusyBird/Watcher/Aggregator.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 20 20 100.0


line stmt bran cond sub pod time code
1             package BusyBird::Watcher::Aggregator;
2 11     11   47 use strict;
  11         20  
  11         381  
3 11     11   50 use warnings;
  11         15  
  11         318  
4 11     11   5580 use Async::Selector 1.03;
  11         26172  
  11         327  
5 11     11   72 use parent qw(BusyBird::Watcher Async::Selector::Aggregator);
  11         15  
  11         82  
6              
7             sub new {
8 181     181 1 293 my ($class, @args) = @_;
9 181         668 return $class->SUPER::new(@args);
10             }
11              
12             1;