Branch Coverage

blib/lib/Sport/Analytics/NHL/Report.pm
Criterion Covered Total %
branch 93 150 62.0


line true false branch
229 2 36 unless ($args->{'data'} or $args->{'file'})
233 1 2 if ($args->{'data'} and $args->{'file'})
240 1 37 unless ($type)
245 36 1 if $args->{'file'}
254 4 37 unless &set_args($args)
257 27 10 unless $class =~ /\:\:[A-Z]{2}$/
259 1 36 unless ($plugin)
265 8 28 $REPORT_TYPES{$args->{'type'}} eq 'json' ? :
277 28 0 if ($args->{'file'})
280 23 5 if (-f $tree and (stat $tree)[9] > (stat $args->{'file'})[9] - 2)
286 5 23 unless ($self->{'html'})
291 0 1 if ($args->{'type'} eq 'ES' and $args->{'data'} =~ /width\=100\%/i and not $args->{'data'} =~ /width\=100\%\>/i)
298 5 0 if ($args->{'file'})
325 0 16 if $self->{'old'}
329 0 144 $self->{'old'} ? :
331 32 112 unless $content and not ref $content
332 0 0 if ($self->{'old'} and $r == 4 and $content =~ /\,/)
335 0 112 $self->{'old'} ? :
336 0 112 if ($content and $content =~ /\s*(attendance|attd)\s+(\d+\S+\d+)\s*$/i)
341 0 112 if ($r == 11 and not $self->{'attendance'})
344 0 112 if ($content and $content =~ /^\s*(\d+\:\d+)\s+(\S\S)\s+(\S\S)\s+at\s+(.*)/)
350 32 80 unless $method
358 0 16 if $self->{'status'} eq 'End of Game' or $self->{'status'} eq 'End of Period 4' or $self->{'status'} eq 'Period 4 (0:00 Remaining)'
391 0 16 if (not $arena_info =~ /att/i) { }
0 16 elsif ($arena_info =~ /attendance.*?(\d+)\,(\d+)\s*$/i) { }
393 0 0 if ($arena_info =~ /(\d+\:\d+ \w\w \w\w) (at|\@) (.*)/)
406 16 0 if ($attendance) { }
408 0 0 if ($arena_info =~ /(at|\@).*?(\w.*)/)
441 0 16 if ($status_info =~ / (\d+) \- (\S.*)/) { }
457 0 32 $self->{'old'} ? :
459 0 0 if (ref $name and $self->{'old'})
467 0 32 $self->{'old'} ? :
468 0 32 unless $score =~ /^\d{1,2}\s*$/
469 0 32 unless defined $score and $score =~ /^\d{1,2}\s*$/
470 0 32 unless (defined $score and $score =~ /^\s*\d{1,2}\s*$/)
473 32 0 if ($name)
477 0 32 if $name eq 'CANADIENS MONTREAL'
492 0 48 unless ref $base_element
493 16 32 if ($base_element->tag eq 'table')
495 0 16 if $base_element->{'_content'}[0]->tag eq 'tbody'
511 16 0 if ($main_table->attr('class')) { }
528 0 48 if ($self->{'old'} and @{$self->{'head'};} == 2) { }
533 0 48 if $gameinfo_size == 12
534 0 48 if $gameinfo_size == 14
535 0 48 $self->{'old'} ? :
537 16 32 $i % 2 ? :
539 0 16 if ($self->{'status'} =~ /end.*period (3|4)/i and $self->{'teams'}[0]{'score'} != $self->{'teams'}[1]{'score'})
543 0 16 if $self->{'month'} < 9
544 0 16 if ($self->{'season'} != 2012 and $self->{'month'} > 3 and $self->{'month'} < 8 and $self->{'season_id'} <= $Sport::Analytics::NHL::Report::LAST_PLAYOFF_GAME_INDEX or $self->{'season'} == 2012 and $self->{'start_ts'} >= $Sport::Analytics::NHL::Report::LATE_START_IN_2012) { }
554 0 16 if $self->{'teams'}[0]{'name'} eq 'CANADIENS MONTREAL'
556 0 16 if $self->{'teams'}[1]{'name'} eq 'CANADIENS MONTREAL'
574 0 18 $date =~ /^\d/ && !$force_us ? :
584 2 16 unless ($end_h)
586 2 0 unless ($start_h)
595 16 2 if $start_h < 12
596 16 2 if $end_h < $start_h
598 0 18 if ($end_h > 23) { }
619 0 0 if ($self->{'_score'}[0] == $self->{'_score'}[1]) { }
0 0 elsif ($self->{'_score'}[$self->{'_t'}] > $self->{'_score'}[1 - $self->{'_t'}]) { }
626 0 0 $self->{'ot'} || $self->{'so'} ? :
638 0 52982 if $ENV{'SHOW_WALK'}
641 518 202158 unless $$tpointer and ref $$tpointer
646 0 52464 $want_content ? :
653 16 2 unless $self->{'type'} eq 'BH'
665 0 4186 if $event->{'game'}
666 248 3938 if $event->{'penalty'}
668 3476 710 if ($event->{'team1'})
670 3476 0 if $event->{'team1'} ne 'OTH'
674 1756 263 $event->{'team1'} eq $self->{'teams'}[1]{'name'} ? :
1457 2019 $event->{'team1'} eq $self->{'teams'}[0]{'name'} ? :
677 858 3328 if $event->{'team2'} and $event->{'team2'} ne 'OTH'
682 4186 0 $event->{'stage'} == $Sport::Analytics::NHL::Report::PLAYOFF || $event->{'stage'} == $Sport::Analytics::NHL::Report::REGULAR && $event->{'period'} < 5 ? :
0 4186 $event->{'special'} ? :
684 0 18 unless @{$self->{'events'};}
688 15 37 if defined $tb