Branch Coverage

blib/lib/chat2.pl
Criterion Covered Total %
branch 0 70 0.0


line true false branch
51 0 0 if ($server =~ /^(\d+)+\.(\d+)\.(\d+)\.(\d+)$/) { }
55 0 0 unless @x
59 0 0 unless (socket S, $pf_inet, $sock_stream, $tcp_proto)
63 0 0 unless (bind S, $thisproc)
67 0 0 unless (connect S, $serverproc)
93 0 0 unless (socket NS, $pf_inet, $sock_stream, $tcp_proto)
97 0 0 unless (bind NS, $thisproc_local)
101 0 0 unless (listen NS, 1)
121 0 0 unless defined $pty
123 0 0 unless defined $pid
124 0 0 unless ($pid)
127 0 0 if (open DEVTTY, "/dev/tty")
134 0 0 unless fileno STDERR == 2
175 0 0 if ($_[0] =~ /$nextpat/)
184 0 0 if $endtime < 600000000
186 0 0 if (defined $S{'needs_accept'})
190 0 0 unless (accept S, NS)
199 0 0 unless ($subname = $expect_subname{join $;, $caller, @_})
210 0 0 if ($pattern =~ /^eof$/i) { }
0 0 elsif ($pattern =~ /^timeout$/i) { }
237 0 0 if $eof
242 0 0 if $timeout
268 0 0 if $@
279 0 0 if ($_[0] =~ /$nextpat/)
285 0 0 if ($debug)
296 0 0 if ($_[0] =~ /$nextpat/)
300 0 0 if (defined $S{'needs_close'})
321 0 0 if (/$nextpat/o) { }
323 0 0 if (length $SYM)
329 0 0 /(?:::|')/ ? :
338 0 0 if vec $rmask, $_, 1
354 0 0 if (-e '/dev/pts000') { }
360 0 0 unless -e sprintf("/dev/$kind%c0", $bank)
363 0 0 unless open $_PTY, "+>$pty"
366 0 0 unless open $_TTY, "+>$tty"