Если в двух словах прокукисы, то Тебе надо подключить следующее:
use CGI qw/:standart/;
use CGI::Cookie;
Читаются кукисы так:
$xxx=$co->cookie('COOKIE_NAME');
#заносим в переменную $xxx кукис с именем 'COOKIE_NAME';
Что бы записать кукисы:
$cookie = new CGI::Cookie(-name=>'COOKIE_NAME',-value=>$xxx,-expires=>"+365d");
#coздаём печенье с именем 'COOKIE_NAME', в которое кладём значение $xxx
#expires показывает как долго кукисы будут храниться
print "Set-Cookie: $cookie\n";
#передаём браузеру HTTP-заголовок с печеньем