Perlで301リダイレクト

Perlで301リダイレクト

PerlPerlで301リダイレクト

今まで Perl が使われているサイトで 301 リダイレクトを使う機会がなかったのですが、今回機会に恵まれたので実装してみました。

CGI のリダイレクト機能(redirect())を使う方法もありますが、これだと 302 のステータスコードになるので、明示的にベタ書き。

#!/usr/bin/perl

print "Status: 301 Moved Permanently\n";
print "Location: http://pakapaka.jp/\n\n";
exit;

最終更新日:

関連記事

人気記事

新着情報