tomcatのスレッドを監視しておかしなスレッドがたまっていないか調べる必要がでてきた。 そこで、muninで監視するスクリプトを見つけたが、ちょっとちがったのと、個別のスレッドの状態までは確認できなかったので、自作しました。 ただ、perlがよくわからんので、そこはまねっこです。 use strict; use Switch '__'; my $ret = undef; if(!eval "require LWP::UserAgent;") { $ret = "LWP::UserAgent not found"; } if(!eval "require XML::LibXML;") { $ret .= "XML::Simple not found"; } my $URL = exists $ENV{'url'} ? $ENV{'url'} : "http://%s:%s\@127.0.