in reply to arrays of arrays
are words tagged with the parts of speech they represent. So what he's wanting to do is deconvolute the word/part-of-speech pairs back into sentences followed by the equivalent parts of speech in the same order.the/article book/noun he/pronoun is/verb ill/adjective
So what he's wanting is a program that would see (\w+)\/(\w+) pairs, split them, push each into an array and once the parse is complete, 'emit' the data in sequential order, first the array of words and second the array of parts of speech. This word-space-number example is just a step on the way to get his textcorpora stuff working.the book article noun he is ill pronoun verb adjective
The output is:#!/usr/bin/perl use warnings; use strict; my @words; my @parts_of_speech; while(my $sentence = <DATA>) { @words = (); @parts_of_speech = (); while ($sentence =~ /(\w+)\/(\w+)/g ) { push(@words, $1) if $1; push(@parts_of_speech, $2) if $2; } print $_, " " for @words; print $_, " " for @parts_of_speech; print "\n"; } __DATA__ the/article book/noun he/pronoun is/verb ill/adjective
Update: cleanupC:\Code>perl linguistic.pl the book article noun he is ill pronoun verb adjective
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: arrays of arrays
by jwkrahn (Abbot) on Sep 07, 2007 at 17:20 UTC | |
|
Re^2: arrays of arrays
by monkantar (Initiate) on Sep 07, 2007 at 15:54 UTC |