Re^4: XML data extraction

[snehit.ar]

Am able to get the correct date pattern .Thanks.
For regex there will be mostly two sets of parens in single string and always want to pick the values from last set of parens i.e :100

my $name = "greenfield (Glossary) (100)";
my $appID;
   foreach ( $name =~ /\((.*?)\)/ )
   {
    $appID = $1;
   }
print $appID;

above code gives me output : Glossary

[hippo]

#!/usr/bin/env perl 
use strict;
use warnings;
use Test::More tests => 1;

my $name = "greenfield (Glossary) (100)";
my $want = '100';

$name =~ /([^(]+)\)$/;
is ($1, $want, "Matched");

If you want what's at the end, anchor it to the end.

[haukex]

As I said, you'll need to show more than one example input, and also "mostly two sets of parens" is still not specific enough. Please see Re: How to ask better questions using Test::More and sample data and following that example post a new question in Seekers of Perl Wisdom, and we should be able to help.