特定の相手が来たら取引出して重要アイテムに当てはまるアイテムを全部渡す罠とか作ってくれませんか？
Perlぜんぜん解らなくて・・・