Select Code to Download

print "Status: 302 Found\n",
        "Location: http://www.perlmonks.com/\n\n";

localhost:~ % perl -MCGI=redirect -e 'print redirect("/somewhere")' | 
+od -c 
0000000    S   t   a   t   u   s   :       3   0   2       M   o   v  
+ e
0000020    d  \r  \n   L   o   c   a   t   i   o   n   :       /   s  
+ o
0000040    m   e   w   h   e   r   e  \r  \n  \r  \n                  
+  
0000053