use strict;
use CGI;
use vars qw($q $c);

$q = new CGI;
$c = $q->cookie("Username");