use CGI;
my $q = CGI->new;
my $word = $q->param('word');