Can you please explain a) and b) more detailed please? i tried out yous answer of a) which is

$count = @count = $data =~ m/and/g; and it works ok
[download]

also this works as well

$count = () = $data =~ m/and/g;
[download]

The problem is that i don't seem to understand why they are working!!! can u please expalin a liitle bit more? as far as for b) is this

$_ = 'foo and bar and baz went to the sea.';
@pairs = /(and)(?=\W*(\w+))/g;
print join "#", @pairs;
[download]

the same as this?

$data = 'foo and bar and baz went to the sea.';
@pairs = $data =~ /(and)(?=\W*(\w+))/g;
print "@pairs";
[download]

i dont understand this line of yours!

@pairs = /(and)(?=\W*(\w+))/g;
[download]

do you mean this?

@pairs = $data =~ /(and)(?=\W*(\w+))/g;
[download]

is $data implied on this? and what about the w the * and the +?

edited: Sat Sep 20 15:00:09 2003 by jeffa - code tags