testlib | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 1 | 8 | 12.5 |
line | true | false | branch |
---|---|---|---|
24 | 8 | 0 | if (my $socket = 'IO::Socket::INET'->new('Listen', 5, 'LocalAddr', shift() || '127.0.0.1')) |
48 | 0 | 0 | if (defined wantarray) { } |
0 | 0 | elsif (@_) { } | |
73 | 0 | 0 | unless open my $handle, $_[0] |