Hello all,
I have
$text = '(this) is just really small test.';
in loop I want get all 2-words and 3-words:
2 words:
(this) is
is just
just really
really small
small test.
3 words:
(this) is just
is just really
...and so on
This is not a big deal, 2 words I did with:
while ($text =~ /(?=(\S+\s+\S+))\S+/g) {
print $1, "\n";
}
(should be written with \w; \W, but that's no deal)
similar will be 3 words. But I have to do it this way by comparing all
this words against table, and when something is found put a link. So
output should like:
'(this) <a href="/foo/bar.html">is just</a> really small test.'
I already have routine, which searches table and print back if
something found.
This is quite hard, I done it with 2 words, but I think it is not
optimal and I guess it should be more easy to write 2,3..n word
version.
Could anyone help me on this ?
Thanks
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
