my ($a, $b) = (-5, 7);
$ans = eval 'abs($a * $b)';  # => 35