spln2016:diario4
Differences
This shows you the differences between two versions of the page.
| Both sides previous revisionPrevious revision | |||
| spln2016:diario4 [2016/03/09 16:49] – [Diário de Bordo - Aula 4 - 2016-03-07] ambs | spln2016:diario4 [2016/03/09 16:51] (current) – ambs | ||
|---|---|---|---|
| Line 48: | Line 48: | ||
| - | ### Scripting | + | === Scripting |
| Começamos por criar um exemplo básico do uso da biblioteca Jspell dentro do perl. | Começamos por criar um exemplo básico do uso da biblioteca Jspell dentro do perl. | ||
| Line 54: | Line 54: | ||
| $ cat jspell.pl | $ cat jspell.pl | ||
| - | ```perl | ||
| - | # | ||
| - | | + | # |
| - | use strict; | + | |
| + | | ||
| + | use strict; | ||
| + | use Lingua:: | ||
| + | use Data:: | ||
| + | |||
| + | my $dic = Lingua:: | ||
| + | |||
| + | my @analysis = $dic -> fea(" | ||
| + | |||
| + | use Data:: | ||
| + | print Dumper(\@analysis); | ||
| - | use Lingua::Jspell; | + | Resultdo: |
| - | use Data:: | + | |
| - | + | ||
| - | my $dic = Lingua:: | + | |
| - | + | ||
| - | my @analysis = $dic -> fea(" | + | |
| - | + | ||
| - | use Data:: | + | |
| - | print Dumper(\@analysis); | + | |
| - | ``` | + | |
| $ perl jspell.pl | $ perl jspell.pl | ||
| - | ```perl | + | |
| - | $VAR1 = [ | + | |
| { | { | ||
| ' | ' | ||
| Line 98: | Line 97: | ||
| } | } | ||
| ]; | ]; | ||
| - | ``` | ||
| Agora que já conseguimos dar uso à biblioteca, vamos agora usá-la para descobrir os radicais das palavras no dicionário português e contar a frequência de cada radical. | Agora que já conseguimos dar uso à biblioteca, vamos agora usá-la para descobrir os radicais das palavras no dicionário português e contar a frequência de cada radical. | ||
spln2016/diario4.1457542157.txt.gz · Last modified: 2016/03/09 16:49 by ambs