これくしーのばやい。
my %Result_port_chk = (
'error' , qq|<span class="error">ソケット作成に失敗。</span>|,
'refuse' , qq|<span class="refuse">応答無し。</span>|,
'connect', qq|<span class="alert">接続できますた。(^o^)</span>|,
'proxy0' , qq|<span class="proxy">proxy 経由で接続できますた。(Connected as hostname)(^Q^)</span>|,
'proxy1' , qq|<span class="proxy">proxy 経由で接続できますた。(Connected as IP Address)(^Q^)</span>|,
'proxy2' , qq|<span class="proxy">proxy 経由(違う出口)で接続できますた。(Connected as hostname)(^Q^)</span>|,
'proxy3' , qq|<span class="proxy">proxy 経由(違う出口)で接続できますた。(Connected as IP Address)(^Q^)</span>|,
'close' , qq|<span class="safe">接続に失敗。</span>|,
);
proxy\d のものを「串」とみなしています。
Boo2008もほとんど同じ仕組み♪