perl匹配一行中多个字符串
比如一行数据
(21,0,0)(110,33,0)(117,1,2)
规律就是一对()内有3个数字，我只要第一个数字，每行输出一个
echo "(21,0,0)(110,33,0)(117,1,2)" | perl -ne 'print "$1\n" if /\((\d+)/'
结果是21
我希望是
21
110
117
请教各位大牛 perl 正则
[解决办法]
是要加 /g 吗？
[解决办法]
echo "(21,0,0)(110,33,0)(117,1,2)"
[解决办法]
perl -ne '@d = /\((\d+)/g; print join("\n", @d)'
