use CGI;

my $q = new CGI($response);

print 'My ID = ' . $q->param('id');
print 'My Results = ' . $q->param('results');

##</code><code>##

my %params = $q->Vars;

print "My ID = $params{'id'}";