Subject: | API weakness |
The lack of a string-returning output_perl() method leads me to silliness like:
my $scalarFh = new IO::Scalar( \$actualPerl );
my $oldFh = select $scalarFh;
$prog->output_perl;
select $oldFh;
close $scalarFh;
...if I just want to grab the string.
Yuck. I just want a $prog->getPerlTranslation() method.