blib/lib/IO/SigGuard.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 2 | 5 | 40.0 |
line | l | !l | condition |
---|---|---|---|
128 | 0 | 6 | $TIME_CR || 'Time::HiRes'->can('time') || \&IO::SigGuard::_time |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
105 | 758040 | 0 | 0 | (@_ == 2 ? CORE::syswrite($_[0], $_[1], length($_[1]) - $wrote, $wrote) : (@_ == 3 ? CORE::syswrite($_[0], $_[1], $_[2] - $wrote, $wrote) : (@_ == 4 ? CORE::syswrite($_[0], $_[1], $_[2] - $wrote, $_[3] + $wrote) : die("Wrong args count! (@_)")))) || do { if ($!) { redo WRITE if $!{'EINTR'}; return undef; }; die 'empty write without error??' } |