@test3 = grep {$_ =~ /md/ } @test;