- or download this
$str = q!AND (random text) AND (more random text) AND (yet more)!;
$str = q!OR (random text) OR (more random text) OR (yet more)!;
- or download this
while ($str =~ /\G(AND|OR)\s+(.+?)/g) {
printf("%s %s\n", $1, $2);
}
- or download this
while ($str =~ /\G(AND|OR)\s+(\(.+?\))/g) {
printf("%s %s\n", $1, $2);
}
- or download this
$str = q!AND (random text) AND (yet (more))!;