I have manager to set a cookie containing a hash of 4 keys and 4 values.
This is the script i have to retrieve the cookies and modify the look of
the page using them. i have constructed it using bit frmo www.perldoc.org.
it keeps saying it cannot run because of something in the way i am
retieving the cookies. what is wrong?
#!/usr/bin/perl
use CGI qw/:standard/;
use CGI::Cookie;
%cookies = fetch CGI::Cookie;
$font = $cookies{'font'}->value;
$size = $cookies{'size'}->value;
$color = $cookies{'cookie'}->value;
$back = $cookies{'back'}->value;
print header();
print <<END_OF_HTML
<html>
<body bgcolor="$back" textcolor="$color">
<p><font face="$font" size="$size">
hello people, hope you like your prefs.
</font></p>
</body>
</html>
END_OF_HTML
--
Matthew Harrison
Internet/Network Services Administrator
Peanut-Butter Cheesecake Hosting Services
Genstate
www.peanutbuttercheesecake.co.uk
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
