Thank you rob This is what i am looking for.. Chaitanya
On Fri, Jun 4, 2010 at 5:45 PM, Rob Dixon <[email protected]> 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; >
