regex - 如何使用perl提取在一行中多次出现的方括号之间的数据？

我有一行包含方括号数据的多个实例。

[data 1] junk [data 2] junk,junk [data 3] junk [data 4]

有人有黏性正则表达式吗？所以我可以用

print $1,$2,$3,$4;

谢谢!

最佳答案

my $s = "[data 1] junk [data 2] junk,junk [data 3] junk [data 4]";
my ($one, $two, $three, $four) = $s =~ /\[([^\]]*)\]/g;
print $one, $two, $three, $four;

关于regex - 如何使用perl提取在一行中多次出现的方括号之间的数据？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/4692954/