$largeArray[0] = "this is a test"; $largeArray[1] = "this is another test"; $largeArray[2] = "that is another test"; $largeArray[3] = "test this is another"; $searchCriteria[0] = "another"; $searchCriteria[1] = "test"; if (@newArray = grep {/@searchCriteria/} @largeArray) { print @newArray; } #### if (@newArray = grep {/another/ and /test/} @largeArray) { print @newArray; }