| Subject: | Undefined subroutine &RTF::Action:: (line 589 in Parser.pm) |
Broken RTF, and I can't get more specific than that because there are
many records being pulled from a database and I don't have the time to
figure out which one, will crash RTF::Parser. This fix seemed to work:
# Control word executer (this is nasty)
sub _control_execute {
my $self = shift;
my $type = shift;
my $arg = shift;
return unless ($type // '') ne '';
no strict 'refs';
&{"RTF::Action::$type"}($self, $type, $arg, 'start');
}
...although I think // is Perl 5.10-specific, so you may need to modify
this to support 5.8.
Kev