Branch Coverage

File:Dpkg/Interface/Storable.pm
Coverage:53.8%

line%coveragebranch
8150TFunless ($self->can("parse"))
8550TFif ($file eq '-') { }
89100TFif ($opts{'compression'})
9350TFunless open $fh, "<", $file
9650TFif ($file ne "-")
9750TFunless close $fh
11550TFunless ($self->can("output"))
11950TFif ($file eq '-') { }
12250TFif ($opts{'compression'})
12650TFunless open $fh, ">", $file
12950TFif ($file ne "-")
13050TFunless close $fh
14250TFunless ($self->can("output"))