Select Code to Download

 sub cgiapp_get_query {
    my $self = shift;
...
     
    return $q;
 }

   $self->query()->nph(1);

   $self->header_type('redirect');
   $self->header_props( -url => $newurl );
   return;

HTTP/1.0 200 OK Server: Microsoft-IIS/5.0 Date: Fri, 19 Aug 2005 02:42
+:29 GMT Content-Type: text/html; charset=ISO-8859-1