5 my $q=new CGI;
  6 my $params=$q->Vars;
  7 $params->{'id'};