- foreach my $module (qw(Archive::Zip Text::Iconv)) {
- eval("use ${module};");
- if ($@) {
- $self->{"form"}->error("The Perl module '${module}' could not be " .
- "loaded. Support for OpenDocument templates " .
- "does not work without it. Please install your " .
- "distribution's package or get the module from " .
- "CPAN ( http://www.cpan.org ).");
- }
- }
-