Select Code to Download

use warnings;
use strict;
...
my %params = map { $_ => $cgi->param($_) || '' } $cgi->param;

print Dumper \%params;

$VAR1 = { 'a' => '\\\'b' };