The following uses a Perl block to calculate a mathematical result:

$number = 49

$root = 0

Begin Perl

$root = sqrt($number);

End

Prompt "The square root of $number is $root."

Limiting a Perl block’s access to variables:

$number = 7

$name = 'Cloey'

Set Exported Perl Variables 'number'

Begin Perl

$number = 99;

$name = 'Jasper';

End

Prompt "Updated number to $number, but the name stays as $name."

Set Exported Perl Variables '*' # restore unlimited variable access