my $string = "This and that";
print "$_\n" for split /(?=\s+and\s+)/, $string;
__OUTPUT__
This
 and that