Pete Emerson wrote:
if ACTION1 is a subset of (killed chopped smooshed knifed) etc.etc
and ACTION2 is a subset of (with by for from) etc. etc. (or even better,
is ACTION2 always the word "by" ??) then here is my sample program:
#!/usr/bin/perl -w
use strict;
my $text='^7Kore^7Adam killed BEST
[EMAIL PROTECTED] wrote:
>
> i did that with this line
>
> my ($killer, $did, $whom, $by, $what) = /^(\S+) (\S+) (\S+) (\S+) (\S+)/;
>
> $1 = $killer and so on, thought that it might be easier for ppl to
> understand if i put it out as $1 , $2 ..
>
> in the worst case i had a user with 2 spaces
if ACTION1 is a subset of (killed chopped smooshed knifed) etc.etc
and ACTION2 is a subset of (with by for from) etc. etc. (or even better,
is ACTION2 always the word "by" ??) then here is my sample program:
#!/usr/bin/perl -w
use strict;
my $text='^7Kore^7Adam killed BEST I TEST by MOD_MACHINEG
i did that with this line
my ($killer, $did, $whom, $by, $what) = /^(\S+) (\S+) (\S+) (\S+) (\S+)/;
$1 = $killer and so on, thought that it might be easier for ppl to
understand if i put it out as $1 , $2 ..
in the worst case i had a user with 2 spaces in his name
like "Elephant Master Killer
How do you determine which pair(s) of words to group together? Are you
always grouping items 3 and 4, or might you sometimes want "monkey
killed" or "killed elephant" or "with stone" ? There needs to be some
way of determining when to pull out a pair and when not to.
[EMAIL PROTECTED] wrote:
b