Branch Coverage

blib/lib/IO/SessionSet.pm
Criterion Covered Total %
branch 5 40 12.5


line true false branch
34 0 1 if (defined $listen and $listen->can('accept'))
53 0 0 if $IO::SessionSet::DEBUG
66 0 0 if $IO::SessionSet::DEBUG
77 0 1 if $thing->isa('IO::SessionData')
78 0 1 if defined fileno $thing
87 0 1 if $thing->isa('IO::SessionData')
88 0 1 if defined fileno $thing
100 0 0 unless @_ >= 2
103 0 0 lc $rw eq 'read' ? :
105 0 0 if (defined $act and $act != $prior)
106 0 0 if $act
107 0 0 unless $act
108 0 0 $act ? :
0 0 $rw eq 'read' ? :
0 0 if $IO::SessionSet::DEBUG
126 0 0 unless my($read, $write) = 'IO::Select'->select($$self{'readers'}, $$self{'writers'}, undef, $timeout)
133 0 0 if $IO::SessionSet::DEBUG
144 0 0 if ($_ eq $$self{'listen_socket'}) { }
146 0 0 if $IO::SessionSet::DEBUG
147 0 0 if $newhandle