Select Code to Download

use CGI;
my $cgi = CGI->new;
...
    delete $cgi->{param}{keywords} if length && !/[&=]/;
}
... rest of the code goes here ...