了解ですー。
http://mbbs.70.kg/dev/beck.html

基本的に、>>527の分離部分と、
print "Location http://speedo.ula.cc/test/r.so/$srv/$bbs/$key/?guid=ON\n\n";
というよくある感じのものなんですけど・・・

まぁ、あとは、
if($url=~m/^http:\/\/[a-zA-Z0-9_\.]*\/test\/read\.cgi\/\w*\/[0-9]{10}\/\w*$/){
とかいう2ch互換の掲示板でのスレッドのURLを抜き出すような正規表現ぐらいかなーと

# もともと、べっかんこではお試し●が使えたりするんで、過去ログを「どうしてもみたーい」とかいうときに、
# 直接スレを開けないと非常に不便だったりしたから作ったという、動機が不純なものなんですよねー