$cook=cookie( -name => \'test\', -value => \'ok\', -expires => \'+1y\');print charset(\'Windows-1251\');print header(-cookie => $cook);