%PERL{"perl expression"}%
%PERL{topic="topic name"}%
%PERL{"'A String'"}%
%PERL{"101 - 59"}%
%PERL{topic="System.VarPERL"}%
%CODE{"perl"}% my $x = 99; $x = $x + 1; return $x; %ENDCODE%