in reply to Getting a variable

Use the CGI module: 
use CGI;
my $q = new CGI;
my $uid = $q->param('uid');

[download]

In Section Seekers of Perl Wisdom