use strict; use CGI; my $q = new CGI; my $q_uid = $q->param('uid'); print "$q_uid\n";