簡易BBS-Cで、ID取得のため新規登録する際に、
既に登録されているニックネームやメールアドレスを入力しても
登録がされてしまいます。

ニックネームやメールアドレスの重複防止機能を付けるには、どのようにしたら良いのでしょうか？

他の掲示板などを見て、下記の部分がそうなのかなと思い、張り付けてみたのですが、
掲示板自体が動かなくなってしまいました。

if (!open(DB,$file)) { &error('システムエラー','パスワード管理ファイルにアクセスできません.','復旧するまでお待ちください.'); }
@LOGIN = <DB>;
close(DB);

@PICKUP = grep(/^$in{'uname'}\:(.+)$/,@LOGIN);
if ($#PICKUP > 0) { &error('システムエラー','そのハンドルネームは既に登録されています.','管理者に修復を依頼してください.'); }
if (@PICKUP) { &error('登録済み','そのハンドルネームは既に登録されています,'ブラウザの[戻る]ボタンを押して前の画面に移動してください.'); }


アドバイスをお願いいたします。

CGIはそれぞれに仕組みが異なるため、ただコピーしてきても
まず動きません。

IDの重複チェックはしているようなので、それを借用できます。
line 630
if ($ID eq $id) { &error("再試行","ＩＤの発行に失敗しました.","戻ってもう一度ボタンを押してください."); }
の直後に
if ($UNAME eq $in{'uname'}) { &error('エラー','この名前は既に使われています','別の名前にしてください'); }
if ($EMAIL eq $in{'email'}) { &error('エラー','このメールアドレスは既に使われています','管理者に問い合わせてください'); }
の2行を追加してください。

しあわせのツボさん、ありがとうございました。
やっぱり、そのまま引用するだけではダメなのですね・・・
勉強になりました！

無事にチェック機能を付けることができました。
ありがとうございました。