| blib/lib/App/Greple/tee.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 20 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 200 | 0 | 0 | if (defined(my $i = &first(sub { $argv->[$_] eq "--"; } , 0 .. $#{$argv;}))) |
| 201 | 0 | 0 | if (my(@command) = splice(@$argv, 0, $i)) |
| 212 | 0 | 0 | if (ref $command ne "ARRAY") |
| 221 | 0 | 0 | unless (my $s1, local $_, my $s2) = $_[0] =~ /\A(\s*)(.*?)(\s*)\z/su |
| 230 | 0 | 0 | if ($fillup) |
| 242 | 0 | 0 | if (@out < &sum(@lines)) |
| 254 | 0 | 0 | if ($blockmatch) |
| 262 | 0 | 0 | if $discrete |
| 270 | 0 | 0 | if @block |
| 274 | 0 | 0 | if ($discrete) { } |