blib/lib/IO/Interactive.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 5 | 22 | 22.7 |
line | true | false | branch |
---|---|---|---|
13 | 5 | 0 | unless -t $out_handle |
16 | 0 | 0 | if (tied *ARGV or defined fileno ARGV) { } |
19 | 0 | 0 | if defined $ARGV and $ARGV eq '-' |
22 | 0 | 0 | if eof ARGV |
38 | 0 | 4 | unless pipe *DEV_NULL, *DEV_NULL2 |
45 | 0 | 2 | &is_interactive ? : |
52 | 0 | 0 | if $bit < 0 |
62 | 1 | 0 | unless (is_interactive()) |
74 | 0 | 0 | unless ($child) |
82 | 0 | 0 | if (_input_pending_on(\*ARGV)) |
123 | 0 | 3 | if (not $impl or $request =~ /\A _/msx) |