$str = 'I know "This" and "That" but I want to know more...';

if ($str =~ m/(\".+?\" and \".+?\")/i) {
  print "Found: $1\n";
}

^d
Found: "This" and "That"