Branch Coverage

blib/lib/Pg/SQL/PrettyPrinter/Node/BitString.pm

Criterion	Covered	Total	%
branch	1	2	50.0

line	true	false	branch
50	0	6	unless $self->{'str'} =~ s/\Ab([01]*)\z/$1/u