| line |
true |
false |
branch |
|
49
|
0 |
0 |
unless my $ref = shift() |
|
56
|
0 |
0 |
if scalar @validargs != 5 |
|
91
|
0 |
0 |
unless my $self = shift() |
|
94
|
0 |
0 |
unless ($self->preTestAction =~ /^(?:null|nothing)$/xi) |
|
95
|
0 |
0 |
unless ($self->testAction =~ /^(?:null|nothing)$/xi) |
|
96
|
0 |
0 |
unless ($self->postTestAction =~ /^(?:null|nothing)$/xi) |
|
138
|
0 |
0 |
unless my $commentChars = shift() |
|
149
|
0 |
0 |
unless my $commentChars = shift() |
|
159
|
0 |
0 |
unless my $commentChars = shift() |
|
169
|
0 |
0 |
unless my $commentChars = shift() |
|
179
|
0 |
0 |
unless my $commentChars = shift() |
|
188
|
0 |
0 |
unless my $self = shift() |
|
190
|
0 |
0 |
if @_ |
|
191
|
0 |
0 |
if (defined $conditions) |
|
199
|
0 |
0 |
unless my $self = shift() |
|
201
|
0 |
0 |
if @_ |
|
202
|
0 |
0 |
if (defined $conditions) |
|
210
|
0 |
0 |
unless my $self = shift() |
|
212
|
0 |
0 |
if @_ |
|
213
|
0 |
0 |
if (defined $conditions) |
|
221
|
0 |
0 |
unless my $self = shift() |
|
223
|
0 |
0 |
if @_ |
|
224
|
0 |
0 |
if (defined $conditions) |
|
236
|
0 |
0 |
unless my $self = shift() |
|
238
|
0 |
0 |
if @_ |
|
240
|
0 |
0 |
if (defined $action) |
|
241
|
0 |
0 |
if $action =~ /^null|nothing$/xi |
|
248
|
0 |
0 |
unless my $self = shift() |
|
250
|
0 |
0 |
if @_ |
|
252
|
0 |
0 |
if (defined $action) |
|
253
|
0 |
0 |
if $action =~ /^null|nothing$/xi |
|
260
|
0 |
0 |
unless my $self = shift() |
|
262
|
0 |
0 |
if @_ |
|
264
|
0 |
0 |
if (defined $action) |
|
265
|
0 |
0 |
if $action =~ /^null|nothing$/xi |
|
281
|
0 |
0 |
unless $attr =~ /[^A-Z]/x |
|
282
|
0 |
0 |
unless $ok_field{$attr} |
|
283
|
0 |
0 |
if @_ |