perl -MCGI=:all -e 'print redirect("http://some/full/uri", cookie(-name => "x", -value => "y" ))'
Status: 302 Found
Window-Target: x=y; path=/
Location: http://some/full/uri