Branch Coverage

blib/lib/Db/Mediasurface/ReadConfig.pm
Criterion Covered Total %
branch 0 18 0.0


line true false branch
14 0 0 unless -T $$self{'_config_file'}
23 0 0 if defined $$self{'_config_tree'}
25 0 0 unless sysopen CONFIG, $$self{'_config_file'}, 0
31 0 0 unless defined $value
34 0 0 if ($value =~ /"(.*?)"/) { }
0 0 elsif ($value =~ /(\d+)/) { }
45 0 0 unless close CONFIG
53 0 0 if ($Db::Mediasurface::ReadConfig::AUTOLOAD =~ /.*::get_([a-zA-Z0-9_]+)/)
59 0 0 if ($Db::Mediasurface::ReadConfig::AUTOLOAD =~ /.*::set_([a-zA-Z0-9_]+)/)