[PerlChina] 求教一个正则问题

$member = 112;
$senter    = 113;

现有这样一个字符串
$string = "112,112,114,117,118,119,113,113";

需求：开头匹配任意个 $member   结尾匹配任意个 $senter
          中间可以出现任意数值，但不能出现 $senter

"^( $member, ) + 这里我写不出来 [ ( $senter ) , ] + $"

我用来查找特定的信息发送次序的。。
感觉这个需求的逻辑好象有问题

帮帮忙呀。

先在这里小鄙视下自己

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。