in reply to Parse colon-delimited data

Easy answer:
/.*/
;-)

Longer answer:

($name, $num1, $num2, $num3)= /^([^:]*?)\s+:\s+(\d+)\s+\((\d+)\s+(\d+) +\)/;
Or, if you prefer to do it in 2 steps:
($name)= /^([^:]*?)\s+:/; @nums= /(\d+)/g

Just some of my thoughts in the tradition of TMTOWTDI ;-)

Replies are listed 'Best First'.
Re: Re: Reqular expression
by bh_perl (Monk) on Jul 22, 2003 at 07:48 UTC
    Thanks bro,
    
    But, some of them is null, how can I get it ?, example: 
    Required Bearer Capability  : ><