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;
>

Reply via email to