my $cgi = CGI->new;
my %param = map { $_ => $cgi->param($_) } $cgi->param();

##</code><code>##

use CGI 2.79;
my $cgi = CGI->new;
my %param = $cgi->Vars;

##</code><code>##

    %form = ('name'   => 'shishir gundavaram',
             'sport'  => 'track and field',
             'events' => '100m');
    $cgi->create_variables (\%hash);
#now you have: $name, $sport and $events. Convenient, huh?