Lingua::FI::Inflect - Finnish inflect
Lingua::FI::Inflect - suomen taivutus
use Lingua::FI::Inflect qw(taivuta to_number %sijamuodot); my($inflected)=taivuta($sijamuodot{genetiivi},"kissa"); # inflects word "kissa" to its genitive print $inflected; # prints "kissan"
or
use Lingua::FI::Inflect qw(taivuta to_number %sijamuodot); foreach my $sijamuoto(sort keys %sijamuodot){ # käy läpi kaikki sijamuodot my($taivutettu,$rule_id)=taivuta($sijamuodot{$sijamuoto},"kissa"); # taivuttaa sanan ko. sijamuotoon print "$sijamuoto: $taivutettu (sääntö == $rule_id)\n"; }
use Lingua::FI::Inflect qw(taivuta to_number %sijamuodot); my($taivutettu)=taivuta($sijamuodot{genetiivi},"kissa"); # taivuttaa sanan "kissa" genetiiviin print $taivutettu; # tulostaa ruutuun "kissan"
tai
taivuta() returns an inputted word inflected to the chosen case.
Supposes that given word is a name if the first letter is capilalized.
taivuta() palauttaa annetun sanan taivutettuna haluttuun sijamuotoon.
Olettaa, että sana on nimi, mikäli ensimmäinen kirjain on iso.
CASE SINGULAR PLURAL
genetiivi very good poor
inessiivi good poor
elatiivi good poor
adessiivi good poor
ablatiivi good poor
partitiivi good poor
essiivi good poor
illatiivi good poor
translatiivi good poor
plural good -
Plural is being considered as one of the cases. For example if You want to inflect word "kissa" - that is cat - to plural translative, first inflect "kissa" to plural ("kissat") and then inflect "kissat" to translative ("kissoiksi").
SIJAMUOTO YKSIKKÖ MONIKKO
genetiivi erittäin hyvä huono
inessiivi hyvä huono
elatiivi hyvä huono
adessiivi hyvä huono
ablatiivi hyvä huono
partitiivi hyvä huono
essiivi hyvä huono
illatiivi hyvä huono
translatiivi hyvä huono
monikko hyvä -
Monikko tulkitaan ykdeksi sijamuodoista. Jos haluat esim taivuttaa yksikössä olevan sanan "kissa" monikon translatiiviin, taivuta "kissa" ensin monikkoon ("kissat") ja taivuta se sitten translatiiviin ("kissoiksi").
Doesn't know all odd words.
Works only the inputted word is non-inflected (plural is also ok).
What comes to names, works well only with Christian names.
Works good only with numbers smaller than twenty.
Ei tunne kaikkia erikoisesti taipuvia sanoja.
Toimii vain yksikön tai monikon perusmuodossa oleville sanoille.
Nimistä taivuttaa hyvin vain etunimet
Taivuttaa hyvin vain kahtakymmentä pienemmät luvut.
Ville Jungman
<ville_jungman@hotmail.com, ville.jungman@frakkipalvelunam.fi>
If You just use this module or have some comments I would be glad to hear them.
Jos käytät tätä moduulia tai jos on jotain parannusehdotuksia, niin olis tosi hauskaa saada palautetta.
Copyright 2004 Ville Jungman
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Tämä kirjastomoduli on vapaa; voit jakaa ja/tai muuttaa sitä samojen ehtojen mukaisesti kuin Perliä itseään.
1 POD Error
The following errors were encountered while parsing the POD:
Non-ASCII character seen before =encoding in 'käy'. Assuming CP1252
To install Lingua::FI::Inflect, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Lingua::FI::Inflect
CPAN shell
perl -MCPAN -e shell install Lingua::FI::Inflect
For more information on module installation, please visit the detailed CPAN module installation guide.