Branch Coverage

blib/lib/My/GenoPheno/Utils.pm

Criterion	Covered	Total	%
branch	1	16	6.2

line	true	false	branch
28	0	2	unless defined $v
41	0	0	if ($gene =~ /^betaCasein$/i)
54	0	0	if ($locus_col =~ /BC-Locus-(\d+)/i)
77	0	0	unless defined $text and $text =~ /Locus-(\d+)/i
90	0	0	if ($text =~ /^(.+?)\s*:\s*(\S+)$/)
105	0	0	unless open my $in, "<", $file
121	0	0	unless open my $out, ">", $file
138	0	0	unless exists $col_ref->{$col_name}