Варю перловку

[shoorick]

#!/usr/bin/perl
print "Content-type: text/html;\n\n";
%cookie = split(/=/, $ENV{HTTP_COOKIE});

И тэ дэ, и тэ пэ...