Select Code to Download

   for my $var ( keys %error_msgs ) {
       no strict 'refs';
...
           $error_found++;
       }
    }

my @fields = qw( name pray remark email );

...
    $error_found++;
  }
}