はじめまして。
簡易BBS２０００を設置したのですが、宣伝目的のURL貼り付けが多くて困っています。
できることなら、http://から始まるURLを入力不可能にしたいのですが。
http://の文章をリンクさせないくらいなら、がんばればできそうかもしれませんが、
目障りなので、禁止にしたいです。
難しいでしょうか？

特定の名前で書き込むとエラーになるように改造はしてあります。

line 556
$value =~ s/(https?|ftp|gopher|telnet|whois|news)\:([\w|\:\!\#\$\%\=\&\-\^\`\\\|\@\~\[\{\]\}\;\+\*\,\.\?\/]+)/<a href=\"$1\:$2\" target=\"_blank\">$1\:$2<\/a>/ig;
がURIのリンク処理です。
やっていることはただの文字列置換なので、これを逆用できます。
つまり
$value =~ s/(https?|ftp)\:([\w|\:\!\#\$\%\=\&\-\@\~\;\+\,\.\?\/]+)/<del>ＵＲＩは書いちゃだめ<\/del>/ig;
のように書き換えればよいでしょう。

追加。
そもそも書き込ませたくないなら、リンク処理をコメントアウトし、かわりに
if ($value =~ s/(https?|ftp)\:\/\/\w/) { &error('エラー','ＵＲＩは書いちゃ嫌'); }
と書けば大丈夫だと思います。

丁寧な回答をありがとうございます。
一つ目は何の問題もなくできたのですが、

＞追加。
そもそも書き込ませたくないなら、リンク処理をコメントアウトし、かわりに
if ($value =~ s/(https?|ftp)\:\/\/\w/) { &error('エラー','ＵＲＩは書いちゃ嫌'); }
と書けば大丈夫だと思います。

これができません。
コメントアウトとは、リンク処理を全部消すことなのでしょうか？
となると、いろんなところをいじらなくてはならないということなのでしょうか？

もし、簡単なのであれば、
何行目のどういう文章を上の文章と置き換えればよいのか教えてもらえませんか？

ぜんぜんわからなくてごめんなさい。

一応自分でもいろいろいじくってみます。

<b>コメントアウト</b>とは行頭に“#”を追記すればその行は未記入と同様の扱いに
なると言う意味です。

コメントアウトというのは、その行の先頭に#を書き足すことを言います。
#があると、Perlはそこからその行末までを無視します。

いじる場所はどちらも同じline 566です。
それをコメントアウト又は削除し、そこに例示したものを追加してください。

しあわせのツボさん、いのちゃんさん、ご返答ありがとうございます。
コメントアウトして、
if ($value =~ s/(https?|ftp)\:\/\/\w/) { &error('エラー','ＵＲＩは書いちゃ嫌'); }
を入れたのですが、
えっと、５００internet server error になりました。

ぜんぜんわからないんですが、リンク処理の文章は、文字の置換をしているだけと、
聞いたので、実際、cgiを動かしたときには、表示される文章に、使われていた
ＵＲＬは全部ＵＲＬはだめの横線引き、の文章になっていました。
そこをこの
if ($value =~ s/(https?|ftp)\:\/\/\w/) { &error('エラー','ＵＲＩは書いちゃ嫌'); }
書き込みをはじくプログラムを組み込むと、表示はどうなるんでしょうねぇ。
今までhttp://〜は、表示できなくて、矛盾が出てくるのでしょうか？

それとも、今までのは表示されるけれども、今後は投稿できないようになるのでしょうか？
（そうなったらとても都合がいいのですが。）
プログラム的に無理なのでしょうか？

タイプミスしてました。すみません。
&error は &Error の誤りです。

あと、s/ は / かと。

if ($value =~ /(https?|ftp)\:\/\/\w/) { &Error('エラー','ＵＲＩは書いちゃ嫌'); }
で、できました。
が、書き込みをはじくのではなくて、本文表示自体にエラーが出てしまい、その投稿以前の
書き込みはまったく表示されないので、ちょっと、利用は難しいです。
しかし、
$value =~ s/(https?|ftp)\:([\w|\:\!\#\$\%\=\&\-\@\~\;\+\,\.\?\/]+)/<del>ＵＲＩは書いちゃだめ<\/del>/ig;
は書き込みはされてはしまうけれども、ＵＲＬは表示されないので、応急処置にはなったと思います。

しあわせのツボさん、yamさん、どうもありがとうございました。

それにしても、皆さんのプログラムの技術の高さには感心しました。
どうもありがとうございました。