Branch Coverage

blib/lib/IO/Handle/Prototype.pm

Criterion	Covered	Total	%
branch	4	4	100.0

line	true	false	branch
13	19	1	@args == 1 ? :
24	226	21	if (my $cb = $self->{'cb'}{$name}) { }