Select Code to Download

my @keys = %urlparams;
foreach my $key (@keys) {
...
        $input{$key} = HTML::Entities::encode($input{$key});
    };
}