my %vars = $cgi->Vars;
my $vars = \%vars;