Condition Coverage

blib/lib/NET/MitM.pm
Criterion Covered Total %
condition 23 34 67.6


and 3 conditions

line !l l&&!r l&&r condition
351 3 4 1 defined $interval and $interval == 0
464 0 0 1 $$this{'verbose'} and $$this{'log_file'}
712 80 5 0 $$this{'client_to_server_callback'} and $$this{'verbose'} > 1
743 18 6 0 $$this{'server_to_client_callback'} and $$this{'verbose'} > 1
937 7 0 4 $$this{'timer_interval'} and $$this{'timer_callback'}
970 5 59 21 $$this{'LISTEN'} and vec $rout, fileno $$this{'LISTEN'}, 1
976 97 59 0 not $$each{'CLIENT'} and $each != $this
977 59 53 44 $$each{'CLIENT'} and vec $rout, fileno $$each{'CLIENT'}, 1
991 121 8 7 $$each{'SERVER'} and vec $rout, fileno $$each{'SERVER'}, 1

or 2 conditions

line l !l condition
716 85 0 print({$$this{'SERVER'};} $msg) || die("Can't send to server: $?")
1067 0 0 shift() || undef

or 3 conditions

line l !l&&r !l&&!r condition
136 7 0 0 shift() || $$this{'remote_port_num'}