wickedxter
User
Aug 1, 2012, 2:26 PM
Post #2 of 3
(8049 views)
|
|
Re: [tallamohan] Suggest any Regular Expression, Please
[In reply to]
|
Can't Post
|
|
my $var1 = 'abc';
my $var2 = 'xyz';
my $var3 = 'abcdexyz';
my @array = ($var1, $var2);
my @match = grep {$var3 =~ /$_/} @array;
print "This match was found $_" for @match;
(This post was edited by wickedxter on Aug 1, 2012, 2:27 PM)
|
MAIN
SEARCH
WHO'S 
LOG 