Thank you rob This is what i am looking for.. Chaitanya
On Fri, Jun 4, 2010 at 5:45 PM, Rob Dixon <rob.di...@gmx.com> wrote: > use strict; > use warnings; > > my $string = '<ComposedBlock ID="ZONE1-2" STYLEREFS="PAR1" HEIGHT="1062" > WIDTH="1986" HPOS="573" VPOS="3003">'; > > my ($id) = $string =~ /ID="(.*?)"/; > > print $id; >