RosettaCodeData/Task/Runtime-evaluation/Perl/runtime-evaluation.pl

mirror of https://github.com/acmeism/RosettaCodeData.git
my ($a, $b) = (-5, 7);
$ans = eval 'abs($a * $b)';  # => 35
	`my ($a, $b) = (-5, 7);`
	`$ans = eval 'abs($a * $b)'; # => 35`