Branch Coverage

blib/lib/MP3/Tag/ParseData.pm
Criterion Covered Total %
branch 31 50 62.0


line true false branch
142 85 1 if ref $filename
161 1 30 if ($flags =~ /[oO]/)
162 1 0 if $flags =~ /O/
164 0 1 unless length $data[0] or $flags =~ /z/
166 1 0 if ($flags =~ /D/ and $file =~ m((.*)[/\\])s)
170 0 1 unless open OUT, "> $file"
171 1 0 if ($flags =~ /b/) { }
175 0 0 if ($e = $self->get_config("encode_encoding_files") and $e->[0])
181 0 1 unless close OUT
185 2 28 if ($flags =~ /R/) { }
193 30 0 if $res = $self->{'parent'}->parse_rex_match($pattern, $data)
195 30 0 if $res
198 0 30 if $flags =~ /m/ and not $res
203 34 0 unless ($flags =~ /b/)
207 0 34 unless length $res->{$k} or $flags =~ /z/
209 0 30 unless $res and keys %$res
222 48 228 if not $self->{'parsing'} and exists $self->{'parsed'}
225 210 24 unless $data and @$data
234 6 31 if $parsing and $parsing <= $c
239 0 34 if ($k eq 'year') { }
0 34 elsif ($k =~ /^U(\d{1,2})$/) { }
20 14 elsif ($k =~ /^\w{4}(\d{2,}|(?:\(([^()]*(?:\([^()]+\)[^()]*)*)\))?(?:\[(\\.|[^]\\]*)\])?)$/) { }
252 12 0 unless length $r or $self->get_config("id3v2_frame_empty_ok")->[0]
253 20 0 if (defined $r or $self->{'parent'}->_get_tag("ID3v2"))
259 31 0 if $res