#! /usr/bin/perl

my $url="<Url><![CDATA[http://abc.com/search?q=perl+grep+&ie=utf8&oe=utf8&aq=t]></Url>";
my $str="dog";

my @f=("dog","<Url><![CDATA[http://abc.com/search?q=perl+grep+&ie=utf8&oe=utf8&aq=t]></Url>");

if(grep{/$url/}@f){print "Match!!\n";}
else {print "No match\n";}