my @cdata = (["test1.txt", "Subject2", 200],
              ["test2.txt", "Subject2", 300],
              ["test3.txt", "Subject1", 600],
              ["test4.txt", "Subject4", 900],
              ["test5.txt", "Subject6", 200],
);

##</code><code>##

my $SearchStr = "test2.txt";
my $GrepResult = grep(/$SearchStr/,@cdata);