@interesting_lines = grep /^(?=.*$string1)(?=.*$string2)/, @log;