my $s = q[dogs OR cats OR "flying fish" OR (shrimp AND squid)];