sub fee_beforeで$kaizyuの値を取得していますか？
解毒料とかと同じフラグ$feに記録している場合は、($cr,$rv,$kaizyu) = split(/△/,$fe);というように。

また、sub fee_afterで$fe = "$Fm{'cr'}△$Fm{'rv'}△$Fm{'kaizyu'}";としていますか？

以上2点を確認してみてください。

▼関連発言
│
└◆444:解呪について（；； [masaki] 03/22 12:58
　└◆445:Re:解呪について（；； [masaki] 03/22 13:41
　　└◆446:Re[2]:解呪について（；； [moon] 03/22 16:36
　　　└◆448:Re[3]:解呪について（；； [masaki] 03/22 17:59
　　　　└◆450:Re[4]:解呪について（；； [moon] 03/22 21:27
　　　　　└◆451:Re[5]:解呪について（；； [masaki] 03/22 22:43<-last