Select Code to Download

#!/bin/perl

...

print header(-cookie=>\@cookie);

Set-Cookie: ID=123456
...
Date: Mon, 02 Apr 2001 17:42:01 GMT
Content-Type: text/html