john wright schreef:

>   I have a data in a variable like
>   $data="book(18614)---book2.2(18616)---book3(18617)---book4(14432)
>   ......... so on" i want to store all digit value lying between (
>   ) into an array. $array[0]=18614
>   $array[1]=18616
>   $array[2]=18617 ... so on

  @array = $data =~ /\((\d+)\)/g ;

-- 
Affijn, Ruud

"Gewoon is een tijger."



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to