sub armでは無いです。
Set Itemでした。申し訳ない。

　　　　　　　　　　　　elsif ($sts =~ /ApCb|FdCb/ && $sp =~ /Qp/) {
　　　　　　　　　　　　　　　　if ($av eq 'dead') { &umsg('死') }
　　　　　　　　　　　　　　　　else { &set_item; require './pl/itm_up.pl';&itm up; }
　　　　　　　　　　　　}
Use Afterの設定はこんな感じです。Qpは装備フラグで、特定武具を装備した場合プレイヤースキルに追加されます。外したときは消えます。
FdCb、ApCbは強化アイテムフラグです。
つまり、強化アイテムフラグがあり、特定武具が装備されていた場合はset itemを通りitm upを通って強化されるわけです。
何も装備していない場合は別の処理がされます。

▼関連発言
│
└◆965:置換 [ミル] 02/29 05:33
　└◆966:Re:置換 [ミル] 02/29 05:35
　　└◆967:Re[2]:置換 [moon] 02/29 13:04
　　　└◆968:Re[3]:置換 [ミル] 02/29 21:56
　　　　└◆969:Re[4]:置換 [ミル] 02/29 22:07
　　　　　└◆970:Re[5]:置換 [moon] 02/29 23:29
　　　　　　└◆971:Re[6]:置換 [ミル] 03/01 13:21
　　　　　　　└◆972:Re[7]:置換 [ミル] 03/01 15:28
　　　　　　　　└◆973:Re[8]:置換 [ミル] 03/01 15:33
　　　　　　　　　└◆974:Re[9]:置換 [moon] 03/01 19:14
　　　　　　　　　　└◆975:Re[10]:置換 [moon] 03/01 22:25
　　　　　　　　　　　└◆976:Re[11]:置換 [ミル] 03/06 19:30
　　　　　　　　　　　　└◆977:Re[12]:置換 [ミル] 03/06 19:39
　　　　　　　　　　　　　└◆978:Re[13]:置換 [moon] 03/06 20:26
　　　　　　　　　　　　　　└◆993:うおおう [ミル] 03/20 20:29<-last