my @result = split /($query)/, $source;