--- CGI-Simple-1.112/lib/CGI/Simple.pm-	2010-04-04 12:47:43.525887632 +0000

+++ CGI-Simple-1.112/lib/CGI/Simple.pm	2010-04-04 12:59:51.261889826 +0000

@@ -225,18 +225,21 @@ sub _mod_perl_request {

 sub _initialize_mod_perl {

   my ( $self ) = @_;

-  eval "require mod_perl";

+  eval { require mod_perl; };

   if ( defined $mod_perl::VERSION ) {

     if ( $mod_perl::VERSION >= 2.00 ) {

       $self->{'.mod_perl'} = 2;

+      eval {

       require Apache2::RequestRec;

       require Apache2::RequestIO;

       require Apache2::RequestUtil;

       require Apache2::Response;

       require APR::Pool;

+      };

+      die $@ if $@;

       my $r = $self->_mod_perl_request();

@@ -249,7 +252,10 @@ sub _initialize_mod_perl {

     else {

       $self->{'.mod_perl'} = 1;

+      eval {

       require Apache;

+      };

+      die $@ if $@;

       my $r = $self->_mod_perl_request();