▼スレッド
│
└◇257:Re[6]:一期一会 [moon] 01/12 13:34

　├◇258:Re[7]:一期一会 [moon] 01/12 14:57
　└◇259:Re[7]:一期一会 [masaki] 01/12 15:37
　　└◇260:Re[8]:一期一会 [moon] 01/12 15:46
　　　└◇261:Re[9]:一期一会 [masaki] 01/12 17:42

すみません。書き間違いです。
if(@items){foreach(0..$#items){〜}}を、foreach(@items){〜}にしてください。

これとは関係ないですが、Paスキルの処理が変だと思いますよ。（&partneroutは余計だし、メッセージが変になるし）
・不明とかを無視したくない場合は、if($psp =~ /Pa/){ push (@msg,"$pnmが現れた"); &partnerout }を削除。
・無視しても良い場合は、if($psp =~ /Pa/){ push (@msg,"$pnmが現れた"); &partnerout }の&partneroutをreturn;に変更。

たぶん、PerlEditorなどを使用していると思いますが、そういうエディタの中には全角空白を表示する機能があるものがあります。
PerlEditorの場合は、表示→設定→表示色→マーク表示のところ。

ありがとうございます！
Paスキルは、いろいろやってわけがわからなくなっていたやつです。（ぉぃ
質屋につけようと思っていたのですが（＾＾；
それまで直していただきありがとうございます。

ええと、話はもどりますが、moonさんの言われたとおりなおしてみて、会えるようにはなったのですが、今度は紹介状アイテムがなくなりません。
（何度でも会えてしまいます）
なぜでしょうか？

さらに訂正箇所が間違っていました。
訂正したところを戻して、split(/△/)をsplit(/△/,$items[$_])に修正してください。
今度こそは。（笑）

できました〜〜〜〜！！
ありがとうございます！！
本当にありがとうございます〜【感激】