Blame sukija/sanat/jokinen.sh
|
Packit |
1f3717 |
#!/bin/bash
|
|
Packit |
1f3717 |
|
|
Packit |
1f3717 |
# Tehdään joki-sanaan päättyvistä paikannimistä
|
|
Packit |
1f3717 |
# -kelainen ja -kinen -loppuiset nimi-laatusanat.
|
|
Packit |
1f3717 |
# Esim. Utsjoki -> utsjokelainen, utsjokinen.
|
|
Packit |
1f3717 |
|
|
Packit |
1f3717 |
grep 'joki",' paikannimet.lex \
|
|
Packit |
1f3717 |
| gawk '{
|
|
Packit |
1f3717 |
print "[perusmuoto:", substr($4,1,length($4)-2) "kelainen\", alku:",
|
|
Packit |
1f3717 |
substr($4,1,length($4)-2) \
|
|
Packit |
1f3717 |
"kelai\", luokka: nimi_laatusana, jatko: <nainen>, äs: a];"
|
|
Packit |
1f3717 |
print "[perusmuoto:", substr($4,1,length($4)-2) "kinen\", alku:",
|
|
Packit |
1f3717 |
substr($4,1,length($4)-2) \
|
|
Packit |
1f3717 |
"ki\", luokka: nimi_laatusana, jatko: <nainen>, äs: a];"
|
|
Packit |
1f3717 |
}' >jokinen.lex
|
|
Packit |
1f3717 |
|