请问匹配(10-26 12:10)这样的正则怎么写？

leel

请问匹配(10-26 12:10)这样的正则怎么写？
就是(年-月空格小时:分钟)。
感谢！

fozz

while ($l = <STDIN>) {
    if ($l=~/\([0-9][0-9]-[0-9][0-9] [0-9][0-9]:[0-9][0-9]\)/) {
        print $l;
    }
}

fozz

好象上面的麻烦了些，

while ($l = <STDIN>) {
    if ($l=~/\(\d+\-\d+\ \d+\:\d+\)/) {
        print $l;
    }
}