初めまして

過去ログを漁っていて、表題の紹介状の改造を取り入れようとしてみたのですが、エラーが出て上手くいきませんでした

記事が分かれていたので、まとめると以下の部分だけですよね？

contact_checkの、
　　foreach (@items) {
　　　　$right = 1 if (split(/△/))[1] =~ /$vflag/;
　　}
を、
　　if(@items){
　　　　foreach(0..$#items){
　　　　　　if(index(split(/△/,$items[$_]))[1],$vflag)>=0){
　　　　　　　　$right = 1;
　　　　　　　　splice(@items,$_,1); # 紹介状を削除
　　　　　　　　&joinitem('i'); # アイテム結合
　　　　　　　　&userout; # ユーザデータ書き込み
　　　　　　　　last; # ループ終了
　　　　　　}
　　　　}
　　}

sub contact_actionの、
　　if ($psp =~ /(V[a-z])/) {
　　　　$vflag = $1;
　　　　&splititem('i');
　　　　foreach (@items) {
　　　　　　$right = 1 if (split(/△/))[1] =~ /$vflag/;
　　　　}
　　　　if (!$right) {
　　　　　　&error("$pnmに会うためにはあるアイテムが必要です");
　　　　}
　　}
を全て削除

で、パールチェックをしたところ

Unrecognized character \201 at sos2.cgi line 834.

と出てしまいました

訳すとsos2.cgi 834行に未承認の文字￥201.
改造箇所にこんな文字列はないですし、他の改造との相性の問題なのでしょうか？
よろしければ、対処法を教えてください

▼関連発言
│
└◆872:紹介状一期一会について [さると] 01/09 09:24
　└◆873:Re:紹介状一期一会について [moon] 01/09 19:06
　　└◆874:Re[2]:紹介状一期一会について [moon] 01/09 20:11
　　　└◆875:Re[3]:紹介状一期一会について [moon] 01/09 20:14
　　　　└◆876:Re[4]:紹介状一期一会について [さると] 01/10 04:47
　　　　　└◆877:Re[5]:紹介状一期一会について [moon] 01/10 10:28
　　　　　　└◆878:Re[6]:紹介状一期一会について [さると] 01/12 16:35<-last