Branch Coverage

blib/lib/SWF/BinStream/File.pm

Criterion	Covered	Total	%
branch	6	24	25.0

line	true	false	branch
20	0	0	if defined $file
29	0	0	unless defined $file
41	0	0	if defined $$self{'_file'}
42	0	0	unless (ref $file or $file =~ /^\*[\w:]+$/)
45	0	0	unless CORE::open F, $file
58	0	0	if defined $$self{'_file'}
85	1	0	if defined $file
93	0	2	unless defined $file
100	0	1	if defined $$self{'_file'}
101	1	0	unless (ref $file or $file =~ /^\*[\w:]+$/)
104	0	1	unless CORE::open F, '>', $file
117	1	0	if (defined $file)