if ( my %cookies = fetch CGI::Cookie ) {
}