in reply to Surviving 'Illegal division by zero'

eval BLOCK would be your friend here:

eval { $growth = ( $fig_2 / $fig_1 * 100 ) - 100; };
$growth will be undef if the expression dies.

/J\