Help for this page
$string = <<'EOM'; $data = { ... ], 'Person' ) }; EOM
my $mysafe = Safe->new("MySafe"); $mysafe->reval($string);