hi to all,
I cannot use a negative match, and I cannot understand why: someone may
help me?
I've got this four rows (for instance):
araba ADJ arabo
arabo ADJ arabo
arabo NOM arabo
arano VER:pres arare
and, with this regular expression, I would extract only the fourth one:
my $form1 = qw(ara\w+);
my $pos1 = qw([A-Z]+);
my $lemma1 = qw(?!arabo);
my $pattern = "^(?:$form1)[^A-Z]*($pos1)[^A-Z]*($lemma1)\n";
but it doesn't work (the script extracts all the lines).
ANOTHER QUESTION: is there a module to merge different arrays and
extract equal values or I have to use a foreach statement?
Thanks to all,
alladr
|^|_|^|_|^| |^|_|^|_|^|
| | | |
| | | |
| |*\_/*\_/*\_/*\_/*\_/* | |
| |
| |
| |
| http://www.e-allora.net |
| |
| |
**************************************
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
