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

##</code><code>##

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