Branch Coverage

blib/lib/Astro/App/Satpass2/Copier.pm
Criterion Covered Total %
branch 15 20 75.0


line true false branch
31 0 0 if not exists $skip{$attr} and $copy->can($attr)
42 208 140 if $class->can($attr)
47 87 2940 if (@args) { }
61 12 49 if exists $arg{'warner'}
64 13 283 if exists $arg{$name}
66 0 61 if (%arg)
82 812 498 if (@args) { }
84 19 793 if (not defined $val) { }
0 793 elsif (not ref $val and $val->isa('Astro::App::Satpass2::Warner')) { }
0 793 elsif (not &blessed($val) && $val->isa('Astro::App::Satpass2::Warner')) { }