ﾙ*’ｰ’ﾘ＜perlですぅ。

リダイレクト

http://example.comにリダイレクト

print <<_HTML_;
Location: http://example.com/

_HTML_

ステータスコード 301(301 Moved Permanently) でリダイレクト

print <<_HTML_;
Status: 301 Moved Permanently
Location: http://example.com/

_HTML_

[Studying HTTP] HTTP Status Code