use CGI qw/:standard/; use CGI::Cookie; print ("\n\r"); %cookies = CGI::Cookie->fetch; print $cookies{"loginID"}; print $cookies{"loginPassword"}; print "

"; print ("");