in reply to Null values in Perl Calculation
Try changing
$baverage = $rec{'BatterRuns'} / $baverage1; [download]
to
$baverage1 and $baverage = $rec{'BatterRuns'} / $baverage1; [download]
This should only do the divide when $baverage1 is non-zero (i.e. true).