Perlについての質問箱 4箱目

　Perlで作られた掲示板のプログラムがあるのですが。
これにリファラーチェックをつけて特定のページからでないと
表示できないようにしたいのですが。
たとえば『http://ike-ike.net/index1.htm』からでないと表示できないように
したのですが・・・
どの辺をいじったらいいのでしょうか？

ソースはこちら
http://www.ike-ike.net/bbsking.txt

アドバイスお願いします。(゜゜)(｡｡)ペコリ