use strict;
use warnings;
use CGI ();
use CGI::Cookie ();
use YAML ();
print CGI::header("text/plain");
print YAML::Dump( { CGI::Cookie->fetch() } );