if (defined $m) { my @result = (( ref $m eq 'CODE' ) ? &{$m}( ref $match ? @$match : $match) : $m); if (@result == 1) { $match = $result[0]; } else { $match = [ @result ]; } $result->[$i + 1] = $match; } if (defined $stval) { my @result; if (ref $match) { @result = get_strings($match); } else { @result = $match; } if (ref $stval eq 'CODE') { &{$stval}($self, @result); } else { push @{$self->{$stval}}, @result; } }
1 POD Error
The following errors were encountered while parsing the POD:
Unknown directive: =comment
To install DBD::XBase, copy and paste the appropriate command in to your terminal.
cpanm
cpanm DBD::XBase
CPAN shell
perl -MCPAN -e shell install DBD::XBase
For more information on module installation, please visit the detailed CPAN module installation guide.