Branch Coverage

blib/lib/NBI/Opts.pm
Criterion Covered Total %
branch 61 100 61.0


line true false branch
28 104 3 if (substr($_[0], 0, 1) eq "-")
36 103 708 if ($i =~ /^-queue/u) { }
101 607 elsif ($i =~ /^-threads/u) { }
101 506 elsif ($i =~ /^-memory/u) { }
101 405 elsif ($i =~ /^-tmpdir/u) { }
101 304 elsif ($i =~ /^-(mail|email_address)/u) { }
101 203 elsif ($i =~ /^-(when|email_type)/u) { }
101 102 elsif ($i =~ /^-opts/u) { }
101 1 elsif ($i =~ /^-time/u) { }
37 0 103 unless defined $data{$i}
43 0 101 unless defined $data{$i}
45 101 0 if ($data{$i} =~ /^\d+$/u) { }
54 0 101 unless defined $data{$i}
60 0 101 unless defined $data{$i}
65 0 101 unless defined $data{$i}
70 0 101 unless defined $data{$i}
76 0 101 unless defined $data{$i}
78 0 101 if (ref $data{$i} ne "ARRAY")
97 103 3 defined $queue ? :
98 101 5 defined $threads ? :
99 101 5 defined $memory ? :
100 101 5 defined $hours ? :
101 101 5 defined $tmpdir ? :
102 101 5 defined $email_address ? :
103 101 5 defined $email_when ? :
105 101 5 defined $opts_array ? :
119 0 108 if defined $new_val
126 0 106 if defined $new_val
133 0 106 if defined $new_val
140 0 106 if defined $new_val
147 0 106 if defined $new_val
154 0 106 if defined $new_val
161 0 308 if defined $new_val
168 106 0 unless (defined $self->{'opts'})
173 0 0 if ref $new_val ne "ARRAY"
174 0 0 if defined $new_val
187 1 0 defined $self->{'opts'} ? :
221 202 0 if (defined $self->{'email_address'})
227 0 202 unless defined $o
245 101 0 if ($mem =~ /^(\d+)$/u) { }
0 0 elsif ($mem =~ /^(\d+)\.?(MB?|GB?|TB?|KB?)$/iu) { }
249 0 0 if (substr(uc $2, 0, 1) eq 'G') { }
0 0 elsif (substr(uc $2, 0, 1) eq 'T') { }
0 0 elsif (substr(uc $2, 0, 1) eq 'M') { }
0 0 elsif (substr(uc $2, 0, 1) eq 'K') { }
271 0 101 if ($time =~ /^(\d+)$/u) { }
279 101 202 if ($unit eq 'D') { }
101 101 elsif ($unit eq 'M') { }
101 0 elsif ($unit eq 'H') { }
0 0 elsif ($unit eq 'S') { }