my $q = new CGI;
my $url = $q->self_url();