my (@keys,@values) = ($text =~ /\{IS\:([a-zA-Z0-9_-]+)\}(.*)\{\IS\:([a-zA-Z0-9_-]+)\}/g);
my (@keys,@values) = ($text =~ /\{IS\:([a-zA-Z0
阅读背景：
如何将正则表达式字符串替换值（$ 1，$ 2等）映射到散列？
来源：互联网
分享到：
