RosettaCodeData/Task/Runtime-evaluation/Perl-6/runtime-evaluation.pl6

use MONKEY-SEE-NO-EVAL;

my ($a, $b) = (-5, 7);
my $ans = EVAL 'abs($a * $b)';  # => 35
2016 Update 2016-12-05 22:15:40 +01:00			`use MONKEY-SEE-NO-EVAL;`

tasks a-s 2013-04-10 23:57:08 -07:00			`my ($a, $b) = (-5, 7);`
2016 Update 2016-12-05 22:15:40 +01:00			`my $ans = EVAL 'abs($a * $b)'; # => 35`