my @keys = keys %urlparams;
#          ~~~~

##</code><code>##

         $input{$key} = HTML::Entities::encode($urlparams{$key});
         #                                      ~~~~~~~~~