Perl - Plack::Middleware::StatusHtml を書いた
web サーバの死活監視として /status.html へアクセスしてみるということをよくやると思う。
ということで、これだけをやる Middleware を書いた。
例
外部ファイルに http status code を書いておいてそれを返すにはこんな感じ。
use Plack::Builder; builder { enable 'StatusHtml', status => sub { open my $fh, "<", "status.txt" or return 503; chomp( my $status = <$fh> ); $status; }; $app; };