eval "\$hex =~ s/$r->[0]/$r->[1]/”；

$r->[0] 类似 D7 E8 (\S{8}) (4C 87），\S{8}是可变的，所以用eval。

想问的问题是：匹配部分如何保存下来，用了$&，但不对。