line | % | coverage | branch |
91 | 100 | T | F | if ($arg) |
92 | 50 | T | F | if -e $arg |
191 | 100 | T | F | if /^\s*\#/ or not /\S/ |
193 | 50 | T | F | unless (/^(\w[-:0-9A-Za-z]*)(\?)?\=(.*)$/) |
197 | 100 | T | F | if (defined $2) |
198 | 50 | T | F | if $2 eq "?" |
231 | 50 | T | F | unless (defined $vs) |
335 | 100 | T | F | if length $3 < length $rhs |
337 | 50 | T | F | if ($count >= $maxsubsts) |
344 | 100 | T | F | if (defined $self->{'vars'}{$vn}) { } |
349 | 50 | T | F | if ($self->{'attr'}{$vn} & 4) |
356 | 50 | T | F | unless $opts{'no_warn'} |
374 | 100 | T | F | if $self->{'attr'}{$vn} & 1 |
378 | 50 | T | F | if $self->{'vars'}{$vn} eq "" |
413 | 100 | T | F | if &$remove($vn) or not &$keep($vn) |
434 | 100 | T | F | if $self->{'attr'}{$vn} & 2 |
435 | 100 | T | F | $self->{'attr'}{$vn} & 8 ? : |
437 | 50 | T | F | if defined $fh |