#!perl # This file is automatically generated at Sun Jan 13 03:11:35 2002 by makecheck.pl sub checkit {my $nf=''; my $a; my ($uword,$words)=@_; #------------------------------------- $_=$uword; if ((s/óñ$//) && (m/$/) && ($a=$$words{$_}) && ($a=~m/C/)) { $nf.="$_/C "; } #------------------------------------- $_=$uword; if ((s/ì$/ôø/) && (m/[^úó]ôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìá$/ôø/) && (m/[^ó]ôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìï$/ôø/) && (m/[^ó]ôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìé$/ôø/) && (m/[^ó]ôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìóñ$/ôøóñ/) && (m/[^úó]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìáóø$/ôøóñ/) && (m/[^ó]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìïóø$/ôøóñ/) && (m/[^ó]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìéóø$/ôøóñ/) && (m/[^ó]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ì$/óôø/) && (m/[^þ].óôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/åì$/åóôø/) && (m/þåóôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìá$/óôø/) && (m/[^þ].óôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìá$/åóôø/) && (m/þåóôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìï$/óôø/) && (m/[^þ].óôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìï$/åóôø/) && (m/þåóôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìé$/óôø/) && (m/[^þ].óôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìé$/åóôø/) && (m/þåóôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìóñ$/óôøóñ/) && (m/óôøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìáóø$/óôøóñ/) && (m/óôøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìïóø$/óôøóñ/) && (m/óôøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìéóø$/óôøóñ/) && (m/óôøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ì$/óôé/) && (m/óôé$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìá$/óôé/) && (m/óôé$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìï$/óôé/) && (m/óôé$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìé$/óôé/) && (m/óôé$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìóñ$/óôéóø/) && (m/óôéóø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìáóø$/óôéóø/) && (m/óôéóø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìïóø$/óôéóø/) && (m/óôéóø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìéóø$/óôéóø/) && (m/óôéóø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/$/ôé/) && (m/úôé$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìá$/ôé/) && (m/úôé$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìé$/ôé/) && (m/úôé$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìï$/ôé/) && (m/úôé$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/$/ôø/) && (m/úôø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/óñ$/ôøóñ/) && (m/úôøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ë$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ëìá$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ëìï$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ëìé$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ëóñ$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ëìáóø$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ëìïóø$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ëìéóø$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìá$//) && (m/[^áéøñ]$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìï$//) && (m/[^áéøñ]$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìé$//) && (m/[^áéøñ]$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìáóø$/óñ/) && (m/[^áéøñ]óñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìïóø$/óñ/) && (m/[^áéøñ]óñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ìéóø$/óñ/) && (m/[^áéøñ]óñ$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ï$/á/) && (m/á$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/é$/á/) && (m/á$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/ïóø$/áóø/) && (m/áóø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/éóø$/áóø/) && (m/áóø$/) && ($a=$$words{$_}) && ($a=~m/L/)) { $nf.="$_/L "; } #------------------------------------- $_=$uword; if ((s/à$/ôø/) && (m/[áå]ôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/àóø$/ôøóñ/) && (m/[áå]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åí$/ôø/) && (m/[áå]ôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/ôøóñ/) && (m/[áå]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åûø$/ôø/) && (m/[áå]ôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/ôøóñ/) && (m/[áå]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôå$/ôø/) && (m/[áå]ôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/ôøóñ/) && (m/[áå]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åô$/ôø/) && (m/[áå]ôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/ôøóñ/) && (m/[áå]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/àô$/ôø/) && (m/[áå]ôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/àôóñ$/ôøóñ/) && (m/[áå]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/$/ôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/óø$/ôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åí$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åûø$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôå$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åô$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/$/ø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/óñ$/øóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/à$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/àóø$/ïôøóñ/) && (m/ïôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åí$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/ïôøóñ/) && (m/ïôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åûø$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/ïôøóñ/) && (m/ïôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôå$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/ïôøóñ/) && (m/ïôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åô$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/ïôøóñ/) && (m/ïôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/àô$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/àôóñ$/ïôøóñ/) && (m/ïôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïà$/ùôø/) && (m/ùôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïàóø$/ùôøóñ/) && (m/ùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïåí$/ùôø/) && (m/ùôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïåíóñ$/ùôøóñ/) && (m/ùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïåûø$/ùôø/) && (m/ùôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïåûøóñ$/ùôøóñ/) && (m/ùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïåôå$/ùôø/) && (m/ùôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïåôåóø$/ùôøóñ/) && (m/ùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïåô$/ùôø/) && (m/ùôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïåôóñ$/ùôøóñ/) && (m/ùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïàô$/ùôø/) && (m/ùôø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ïàôóñ$/ùôøóñ/) && (m/ùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/õ$/ôé/) && (m/[úó]ôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/õóø$/ôéóø/) && (m/[úó]ôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åí$/ôé/) && (m/[úó]ôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/ôéóø/) && (m/[úó]ôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åûø$/ôé/) && (m/[úó]ôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/ôéóø/) && (m/[úó]ôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôå$/ôé/) && (m/[úó]ôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/ôéóø/) && (m/[úó]ôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åô$/ôé/) && (m/[úó]ôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/ôéóø/) && (m/[úó]ôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/õô$/ôé/) && (m/[úó]ôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/õôóñ$/ôéóø/) && (m/[úó]ôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äõ$/ôé/) && (m/êôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äõóø$/ôéóø/) && (m/êôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äåí$/ôé/) && (m/êôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äåíóñ$/ôéóø/) && (m/êôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äåûø$/ôé/) && (m/êôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äåûøóñ$/ôéóø/) && (m/êôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äåôå$/ôé/) && (m/êôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äåôåóø$/ôéóø/) && (m/êôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äåô$/ôé/) && (m/êôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äåôóñ$/ôéóø/) && (m/êôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äõô$/ôé/) && (m/êôé$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/äõôóñ$/ôéóø/) && (m/êôéóø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ëõ$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ëõóø$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åí$/ø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/øóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åûø$/ø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/øóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôå$/ø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/øóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åô$/ø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/øóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ëõô$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/ëõôóñ$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/M/)) { $nf.="$_/M "; } #------------------------------------- $_=$uword; if ((s/à$/÷áôø/) && (m/á÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åí$/÷áôø/) && (m/á÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åûø$/÷áôø/) && (m/á÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôå$/÷áôø/) && (m/á÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åô$/÷áôø/) && (m/á÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àô$/÷áôø/) && (m/á÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àóø$/÷áôøóñ/) && (m/á÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/÷áôøóñ/) && (m/á÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/÷áôøóñ/) && (m/á÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/÷áôøóñ/) && (m/á÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/÷áôøóñ/) && (m/á÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àôóñ$/÷áôøóñ/) && (m/á÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õà$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåí$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåûø$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåôå$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåô$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õàô$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õàóø$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåíóñ$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåûøóñ$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåôåóø$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåôóñ$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õàôóñ$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àà$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àåí$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àåûø$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àåôå$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àåô$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/ààô$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/ààóø$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àåíóñ$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àåûøóñ$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àåôåóø$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àåôóñ$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/ààôóñ$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õà$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåí$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåûø$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåôå$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåô$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õàô$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õàóø$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåíóñ$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåûøóñ$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåôåóø$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õåôóñ$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õàôóñ$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/à$/ôø/) && (m/[^áåïõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/à$/ñôø/) && (m/[áåïõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åí$/ôø/) && (m/[^áåïõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åí$/ñôø/) && (m/[áåõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éí$/ñôø/) && (m/ïñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åûø$/ôø/) && (m/[^áåïõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åûø$/ñôø/) && (m/[áåõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éûø$/ñôø/) && (m/ïñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôå$/ôø/) && (m/[^áåïõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôå$/ñôø/) && (m/[áåõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éôå$/ñôø/) && (m/ïñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åô$/ôø/) && (m/[^áåïõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åô$/ñôø/) && (m/[áåõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éô$/ñôø/) && (m/ïñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àô$/ôø/) && (m/[^áåïõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àô$/ñôø/) && (m/[áåõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/$/ø/) && (m/ïñôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àóø$/ôøóñ/) && (m/[^áåïõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àóø$/ñôøóñ/) && (m/[áåïõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/ôøóñ/) && (m/[^áåïõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/ñôøóñ/) && (m/[áåõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éíóñ$/ñôøóñ/) && (m/ïñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/ôøóñ/) && (m/[^áåïõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/ñôøóñ/) && (m/[áåõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éûøóñ$/ñôøóñ/) && (m/ïñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/ôøóñ/) && (m/[^áåïõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/ñôøóñ/) && (m/[áåõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éôåóø$/ñôøóñ/) && (m/ïñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/ôøóñ/) && (m/[^áåïõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/ñôøóñ/) && (m/[áåõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éôóñ$/ñôøóñ/) && (m/ïñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àôóñ$/ôøóñ/) && (m/[^áåïõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/àôóñ$/ñôøóñ/) && (m/[áåõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/óñ$/øóñ/) && (m/ïñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õ$/áôø/) && (m/[öûýþ]áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õóø$/áôøóñ/) && (m/[öûýþ]áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éí$/áôø/) && (m/[öûýþ]áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éíóñ$/áôøóñ/) && (m/[öûýþ]áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éûø$/áôø/) && (m/[öûýþ]áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éûøóñ$/áôøóñ/) && (m/[öûýþ]áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éôå$/áôø/) && (m/[öûýþ]áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éôåóø$/áôøóñ/) && (m/[öûýþ]áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éô$/áôø/) && (m/[öûýþ]áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/éôóñ$/áôøóñ/) && (m/[öûýþ]áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/$/ø/) && (m/[öûýþ]áôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/óñ$/øóñ/) && (m/[öûýþ]áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õ$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õóø$/áôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åí$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/áôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åûø$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/áôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôå$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/áôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åô$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/áôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õô$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/õôóñ$/áôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/çõ$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/çõóø$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/öåí$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/öåíóñ$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/öåûø$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/öåûøóñ$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/öåôå$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/öåôåóø$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/öåô$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/öåôóñ$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/çõô$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/çõôóñ$/þøóñ/) && (m/þøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/$/ôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/óø$/ôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åí$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åûø$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôå$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åô$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/$/ø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/óñ$/øóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/U/)) { $nf.="$_/U "; } #------------------------------------- $_=$uword; if ((s/ìà$/éôø/) && (m/[â÷íðæ]éôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/ìàóø$/éôøóñ/) && (m/[â÷íðæ]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/öõ$/äéôø/) && (m/äéôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/öõóø$/äéôøóñ/) && (m/äéôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/à$/éôø/) && (m/[áåìîïòõ]éôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/àóø$/éôøóñ/) && (m/[áåìîïòõ]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/õ$/éôø/) && (m/[öþûý]éôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/õóø$/éôøóñ/) && (m/[öþûý]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/öõ$/úéôø/) && (m/úéôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/öõóø$/úéôøóñ/) && (m/úéôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/ûõ$/óéôø/) && (m/óéôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/ûõóø$/óéôøóñ/) && (m/óéôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/þõ$/ôéôø/) && (m/[^áåéïõùüàñóþ]ôéôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/ýõ$/óôéôø/) && (m/óôéôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/þõóø$/ôéôøóñ/) && (m/[^áåéïõùüàñóþ]ôéôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/ýõóø$/óôéôøóñ/) && (m/óôéôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/í$/ôø/) && (m/éôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/íóñ$/ôøóñ/) && (m/éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/ûø$/ôø/) && (m/éôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/ûøóñ$/ôøóñ/) && (m/éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/å$/ø/) && (m/éôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/åóø$/øóñ/) && (m/éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/$/ø/) && (m/éôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/óñ$/øóñ/) && (m/éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/ñô$/éôø/) && (m/[^öþûý]éôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/ñôóñ$/éôøóñ/) && (m/[^öþûý]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/áô$/éôø/) && (m/[öþûý]éôø$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/áôóñ$/éôøóñ/) && (m/[öþûý]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/W/)) { $nf.="$_/W "; } #------------------------------------- $_=$uword; if ((s/øà$/éôø/) && (m/[â÷ìð]éôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/øàóø$/éôøóñ/) && (m/[â÷ìð]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/øåí$/éôø/) && (m/[â÷ìð]éôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/øåíóñ$/éôøóñ/) && (m/[â÷ìð]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/øåûø$/éôø/) && (m/[â÷ìð]éôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/øåûøóñ$/éôøóñ/) && (m/[â÷ìð]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/øåôå$/éôø/) && (m/[â÷ìð]éôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/øåôåóø$/éôøóñ/) && (m/[â÷ìð]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/øåô$/éôø/) && (m/[â÷ìð]éôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/øåôóñ$/éôøóñ/) && (m/[â÷ìð]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/øàô$/éôø/) && (m/[â÷ìð]éôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/øàôóñ$/éôøóñ/) && (m/[â÷ìð]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷õ$/ôø/) && (m/öéôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷õóø$/ôøóñ/) && (m/öéôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷åí$/ôø/) && (m/öéôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷åíóñ$/ôøóñ/) && (m/öéôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷åûø$/ôø/) && (m/öéôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷åûøóñ$/ôøóñ/) && (m/öéôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷åôå$/ôø/) && (m/öéôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷åôåóø$/ôøóñ/) && (m/öéôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷åô$/ôø/) && (m/öéôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷åôóñ$/ôøóñ/) && (m/öéôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷õô$/ôø/) && (m/öéôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/÷õôóñ$/ôøóñ/) && (m/öéôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õà$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåí$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåûø$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåôå$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåô$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õàô$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õàóø$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåôóñ$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåûøóñ$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåôåóø$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåôóñ$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õàôóñ$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àà$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àåí$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àåûø$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àåôå$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àåô$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ààô$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ààóø$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àåíóñ$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àåûøóñ$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àåôåóø$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àåôóñ$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ààôóñ$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õà$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåí$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåûø$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåôå$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåô$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õàô$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õàóø$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåíóñ$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåûøóñ$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåôåóø$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õåôóñ$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õàôóñ$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îõ$/ôø/) && (m/äåôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îõóø$/ôøóñ/) && (m/äåôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îåí$/ôø/) && (m/äåôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îåíóñ$/ôøóñ/) && (m/äåôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îåûø$/ôø/) && (m/äåôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îåûøóñ$/ôøóñ/) && (m/äåôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îåôå$/ôø/) && (m/äåôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îåôåóø$/ôøóñ/) && (m/äåôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îåô$/ôø/) && (m/äåôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îåôóñ$/ôøóñ/) && (m/äåôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îõô$/ôø/) && (m/äåôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/îõôóñ$/ôøóñ/) && (m/äåôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/à$/ôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àóø$/ôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åí$/ôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/ôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åûø$/ôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/ôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åôå$/ôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/ôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åô$/ôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/ôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àô$/ôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àôóñ$/ôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äõ$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äõóø$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äåí$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äåíóñ$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äåûø$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äåûøóñ$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äåôå$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äåôåóø$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äåô$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äåôóñ$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äõô$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/äõôóñ$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìà$/áôø/) && (m/ðáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìàóø$/áôøóñ/) && (m/ðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìåí$/áôø/) && (m/ðáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìåíóñ$/áôøóñ/) && (m/ðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìåûø$/áôø/) && (m/ðáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìåûøóñ$/áôøóñ/) && (m/ðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìåôå$/áôø/) && (m/ðáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìåôåóø$/áôøóñ/) && (m/ðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìåô$/áôø/) && (m/ðáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìåôóñ$/áôøóñ/) && (m/ðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìàô$/áôø/) && (m/ðáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ìàôóñ$/áôøóñ/) && (m/ðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñçõ$/åþø/) && (m/ìåþø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñçõóø$/åþøóñ/) && (m/ìåþøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñöåí$/åþø/) && (m/ìåþø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñöåíóñ$/åþøóñ/) && (m/ìåþøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñöåûø$/åþø/) && (m/ìåþø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñöåûøóñ$/åþøóñ/) && (m/ìåþøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñöåôå$/åþø/) && (m/ìåþø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñöåôåóø$/åþøóñ/) && (m/ìåþøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñöåô$/åþø/) && (m/ìåþø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñöåôóñ$/åþøóñ/) && (m/ìåþøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñçõô$/åþø/) && (m/ìåþø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/ñçõôóñ$/åþøóñ/) && (m/ìåþøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/à$/ñôø/) && (m/ñôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åí$/ñôø/) && (m/ñôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åûø$/ñôø/) && (m/ñôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åôå$/ñôø/) && (m/ñôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åô$/ñôø/) && (m/ñôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àô$/ñôø/) && (m/ñôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àóø$/ñôøóñ/) && (m/ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/ñôøóñ/) && (m/ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/ñôøóñ/) && (m/ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/ñôøóñ/) && (m/ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/ñôøóñ/) && (m/ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/àôóñ$/ñôøóñ/) && (m/ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õ$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åí$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åûø$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åôå$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/åô$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/õô$/áôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/V/)) { $nf.="$_/V "; } #------------------------------------- $_=$uword; if ((s/öõ$/äåôø/) && (m/äåôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öõóø$/äåôøóñ/) && (m/äåôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ìà$/åôø/) && (m/ðåôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ìàóø$/åôøóñ/) && (m/ðåôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/à$/åôø/) && (m/òåôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/àóø$/åôøóñ/) && (m/òåôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûõ$/óåôø/) && (m/óåôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éí$/åôø/) && (m/[äíîðòóô]åôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éíóñ$/åôøóñ/) && (m/[äòô]åôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éûø$/åôø/) && (m/[äíîðòóô]åôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éûøóñ$/åôøóñ/) && (m/[äòô]åôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éôå$/åôø/) && (m/[äíîðòóô]åôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éôåóø$/åôøóñ/) && (m/[äòô]åôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éô$/åôø/) && (m/[äíîðòóô]åôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éôóñ$/åôøóñ/) && (m/[äòô]åôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ñô$/åôø/) && (m/[äíîðòóô]åôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ñôóñ$/åôøóñ/) && (m/[äòô]åôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäõ$/ùôø/) && (m/âùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäõóø$/ùôøóñ/) && (m/âùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäåí$/ùôø/) && (m/âùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäåíóñ$/ùôøóñ/) && (m/âùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäåûø$/ùôø/) && (m/âùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäåûøóñ$/ùôøóñ/) && (m/âùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäåôå$/ùôø/) && (m/âùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäåôåóø$/ùôøóñ/) && (m/âùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäåô$/ùôø/) && (m/âùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäåôóñ$/ùôøóñ/) && (m/âùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäõô$/ùôø/) && (m/âùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õäõôóñ$/ùôøóñ/) && (m/âùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷õ$/ôø/) && (m/ìùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷õóø$/ôøóñ/) && (m/ìùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷åí$/ôø/) && (m/ìùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷åíóñ$/ôøóñ/) && (m/ìùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷åûø$/ôø/) && (m/ìùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷åûøóñ$/ôøóñ/) && (m/ìùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷åôå$/ôø/) && (m/ìùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷åôåóø$/ôøóñ/) && (m/ìùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷åô$/ôø/) && (m/ìùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷åôóñ$/ôøóñ/) && (m/ìùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷õô$/ôø/) && (m/ìùôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/÷õôóñ$/ôøóñ/) && (m/ìùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öõ$/úáôø/) && (m/úáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öõóø$/úáôøóñ/) && (m/úáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåí$/úáôø/) && (m/úáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåíóñ$/úáôøóñ/) && (m/úáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåûø$/úáôø/) && (m/úáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåûøóñ$/úáôøóñ/) && (m/úáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåôå$/úáôø/) && (m/úáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåôåóø$/úáôøóñ/) && (m/úáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåô$/úáôø/) && (m/úáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåôóñ$/úáôøóñ/) && (m/úáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öõô$/úáôø/) && (m/úáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öõôóñ$/úáôøóñ/) && (m/úáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûõ$/óáôø/) && (m/[^ï]óáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûõóø$/óáôøóñ/) && (m/[^ï]óáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåí$/óáôø/) && (m/[^ï]óáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåíóñ$/óáôøóñ/) && (m/[^ï]óáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåûø$/óáôø/) && (m/[^ï]óáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåûøóñ$/óáôøóñ/) && (m/[^ï]óáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåôå$/óáôø/) && (m/[^ï]óáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåôåóø$/óáôøóñ/) && (m/[^ï]óáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåô$/óáôø/) && (m/[^ï]óáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåôóñ$/óáôøóñ/) && (m/[^ï]óáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûõô$/óáôø/) && (m/[^ï]óáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûõôóñ$/óáôøóñ/) && (m/[^ï]óáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õ$/áôø/) && (m/ïóáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õóø$/áôøóñ/) && (m/ïóáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åí$/áôø/) && (m/ïóáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/áôøóñ/) && (m/ïóáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åûø$/áôø/) && (m/ïóáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/áôøóñ/) && (m/ïóáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åôå$/áôø/) && (m/ïóáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/áôøóñ/) && (m/ïóáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åô$/áôø/) && (m/ïóáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/áôøóñ/) && (m/ïóáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õô$/áôø/) && (m/ïóáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õôóñ$/áôøóñ/) && (m/ïóáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/çõ$/öáôø/) && (m/öáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/çõóø$/öáôøóñ/) && (m/öáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éí$/áôø/) && (m/öáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éíóñ$/áôøóñ/) && (m/öáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éûø$/áôø/) && (m/öáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éûøóñ$/áôøóñ/) && (m/öáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éôå$/áôø/) && (m/öáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éôåóø$/áôøóñ/) && (m/öáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éô$/áôø/) && (m/öáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éôóñ$/áôøóñ/) && (m/öáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/çõô$/öáôø/) && (m/öáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/çõôóñ$/öáôøóñ/) && (m/öáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/à$/éôø/) && (m/ìéôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åí$/éôø/) && (m/ìéôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åûø$/éôø/) && (m/ìéôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åôå$/éôø/) && (m/ìéôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åô$/éôø/) && (m/ìéôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/àô$/éôø/) && (m/ìéôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/í$/ôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/íóñ$/ôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äéí$/ôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äéíóñ$/ôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûø$/ôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûøóñ$/ôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äéôå$/ôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äéôåóø$/ôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/óô$/ôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/óôóñ$/ôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äõô$/ôø/) && (m/äáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äõôóñ$/ôøóñ/) && (m/äáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þõ$/ëáôø/) && (m/[^ó]ëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þõóø$/ëáôøóñ/) && (m/[^ó]ëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåí$/ëáôø/) && (m/[^ó]ëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåíóñ$/ëáôøóñ/) && (m/[^ó]ëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåûø$/ëáôø/) && (m/[^ó]ëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåûøóñ$/ëáôøóñ/) && (m/[^ó]ëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåôå$/ëáôø/) && (m/[^ó]ëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåôåóø$/ëáôøóñ/) && (m/[^ó]ëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåô$/ëáôø/) && (m/[^ó]ëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåôóñ$/ëáôøóñ/) && (m/[^ó]ëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þõô$/ëáôø/) && (m/[^ó]ëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þõôóñ$/ëáôøóñ/) && (m/[^ó]ëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýõ$/óëáôø/) && (m/óëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýõóø$/óëáôøóñ/) && (m/óëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýåí$/óëáôø/) && (m/óëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýåíóñ$/óëáôøóñ/) && (m/óëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýåûø$/óëáôø/) && (m/óëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýåûøóñ$/óëáôøóñ/) && (m/óëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýåôå$/óëáôø/) && (m/óëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýåôåóø$/óëáôøóñ/) && (m/óëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýåô$/óëáôø/) && (m/óëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýåôóñ$/óëáôøóñ/) && (m/óëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýõô$/óëáôø/) && (m/óëáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ýõôóñ$/óëáôøóñ/) && (m/óëáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòõ$/òáôø/) && (m/[âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòõóø$/òáôøóñ/) && (m/[âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòåí$/òáôø/) && (m/[âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòåíóñ$/òáôøóñ/) && (m/[âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòåûø$/òáôø/) && (m/[âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòåûøóñ$/òáôøóñ/) && (m/[âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòåôå$/òáôø/) && (m/[âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòåôåóø$/òáôøóñ/) && (m/[âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòåô$/òáôø/) && (m/[âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòåôóñ$/òáôøóñ/) && (m/[âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòõô$/òáôø/) && (m/[âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åòõôóñ$/òáôøóñ/) && (m/[âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òõ$/òáôø/) && (m/[^âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òõóø$/òáôøóñ/) && (m/[^âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òåí$/òáôø/) && (m/[^âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òåíóñ$/òáôøóñ/) && (m/[^âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òåûø$/òáôø/) && (m/[^âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òåûøóñ$/òáôøóñ/) && (m/[^âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òåôå$/òáôø/) && (m/[^âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òåôåóø$/òáôøóñ/) && (m/[^âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òåô$/òáôø/) && (m/[^âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òåôóñ$/òáôøóñ/) && (m/[^âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òõô$/òáôø/) && (m/[^âä]òáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/òõôóñ$/òáôøóñ/) && (m/[^âä]òáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þõ$/ôáôø/) && (m/[^ó]ôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þõóø$/ôáôøóñ/) && (m/[^ó]ôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåí$/ôáôø/) && (m/[^ó]ôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåíóñ$/ôáôøóñ/) && (m/[^ó]ôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåûø$/ôáôø/) && (m/[^ó]ôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåûøóñ$/ôáôøóñ/) && (m/[^ó]ôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåôå$/ôáôø/) && (m/[^ó]ôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåôåóø$/ôáôøóñ/) && (m/[^ó]ôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåô$/ôáôø/) && (m/[^ó]ôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þåôóñ$/ôáôøóñ/) && (m/[^ó]ôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þõô$/ôáôø/) && (m/[^ó]ôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/þõôóñ$/ôáôøóñ/) && (m/[^ó]ôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îõ$/ôø/) && (m/óôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îõóø$/ôøóñ/) && (m/óôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåí$/ôø/) && (m/óôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåíóñ$/ôøóñ/) && (m/óôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåûø$/ôø/) && (m/óôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåûøóñ$/ôøóñ/) && (m/óôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåôå$/ôø/) && (m/óôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåôåóø$/ôøóñ/) && (m/óôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåô$/ôø/) && (m/óôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåôóñ$/ôøóñ/) && (m/óôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îõô$/ôø/) && (m/óôáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îõôóñ$/ôøóñ/) && (m/óôáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ìà$/áôø/) && (m/óðáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ìàóø$/áôøóñ/) && (m/óðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éí$/áôø/) && (m/óðáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éíóñ$/áôøóñ/) && (m/óðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éûø$/áôø/) && (m/óðáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éûøóñ$/áôøóñ/) && (m/óðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éôå$/áôø/) && (m/óðáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éôåóø$/áôøóñ/) && (m/óðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éô$/áôø/) && (m/óðáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/éôóñ$/áôøóñ/) && (m/óðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ñô$/áôø/) && (m/óðáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ñôóñ$/áôøóñ/) && (m/óðáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìà$/óìáôø/) && (m/óìáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìàóø$/óìáôøóñ/) && (m/óìáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìåí$/óìáôø/) && (m/óìáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìåíóñ$/óìáôøóñ/) && (m/óìáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìåûø$/óìáôø/) && (m/óìáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìåûøóñ$/óìáôøóñ/) && (m/óìáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìåôå$/óìáôø/) && (m/óìáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìåôåóø$/óìáôøóñ/) && (m/óìáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìåô$/óìáôø/) && (m/óìáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìåôóñ$/óìáôøóñ/) && (m/óìáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìàô$/óìáôø/) && (m/óìáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûìàôóñ$/óìáôøóñ/) && (m/óìáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õ$/áôø/) && (m/ò÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õóø$/áôøóñ/) && (m/ò÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åí$/áôø/) && (m/ò÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/áôøóñ/) && (m/ò÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åûø$/áôø/) && (m/ò÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åûøóñ$/áôøóñ/) && (m/ò÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åôå$/áôø/) && (m/ò÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åôåóø$/áôøóñ/) && (m/ò÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åô$/áôø/) && (m/ò÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åôóñ$/áôøóñ/) && (m/ò÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õô$/áôø/) && (m/ò÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õôóñ$/áôøóñ/) && (m/ò÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷õ$/÷áôø/) && (m/ú÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷õóø$/÷áôøóñ/) && (m/ú÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷åí$/÷áôø/) && (m/ú÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷åíóñ$/÷áôøóñ/) && (m/ú÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷åûø$/÷áôø/) && (m/ú÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷åûøóñ$/÷áôøóñ/) && (m/ú÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷åôå$/÷áôø/) && (m/ú÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷åôåóø$/÷áôøóñ/) && (m/ú÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷åô$/÷áôø/) && (m/ú÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷åôóñ$/÷áôøóñ/) && (m/ú÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷õô$/÷áôø/) && (m/ú÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ï÷õôóñ$/÷áôøóñ/) && (m/ú÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîà$/îáôø/) && (m/çîáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîàóø$/îáôøóñ/) && (m/çîáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîéí$/îáôø/) && (m/çîáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîéíóñ$/îáôøóñ/) && (m/çîáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîéûø$/îáôø/) && (m/çîáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîéûøóñ$/îáôøóñ/) && (m/çîáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîéôå$/îáôø/) && (m/çîáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîéôåóø$/îáôøóñ/) && (m/çîáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîéô$/îáôø/) && (m/çîáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîéôóñ$/îáôøóñ/) && (m/çîáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîñô$/îáôø/) && (m/çîáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ïîñôóñ$/îáôøóñ/) && (m/çîáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûõ$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûõóø$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåí$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåíóñ$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåûø$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåûøóñ$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåôå$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåôåóø$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåô$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûåôóñ$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûõô$/èáôø/) && (m/èáôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ûõôóñ$/èáôøóñ/) && (m/èáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôõ$/åóôø/) && (m/þåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåí$/åóôø/) && (m/þåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåûø$/åóôø/) && (m/þåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåôå$/åóôø/) && (m/þåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåô$/åóôø/) && (m/þåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôõô$/åóôø/) && (m/þåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ñäõ$/åóôø/) && (m/óåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ñäåí$/åóôø/) && (m/óåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ñäåûø$/åóôø/) && (m/óåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ñäåôå$/åóôø/) && (m/óåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ñäåô$/åóôø/) && (m/óåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ñäõô$/åóôø/) && (m/óåóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õ$/ôø/) && (m/ìåúôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åí$/ôø/) && (m/ìåúôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åûø$/ôø/) && (m/ìåúôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åôå$/ôø/) && (m/ìåúôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åô$/ôø/) && (m/ìåúôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õô$/ôø/) && (m/ìåúôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äõ$/óôø/) && (m/áóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äõóø$/óôøóñ/) && (m/áóôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåí$/óôø/) && (m/áóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåíóñ$/óôøóñ/) && (m/áóôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåûø$/óôø/) && (m/áóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåûøóñ$/óôøóñ/) && (m/áóôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåôå$/óôø/) && (m/áóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåôåóø$/óôøóñ/) && (m/áóôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåô$/óôø/) && (m/áóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåôóñ$/óôøóñ/) && (m/áóôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äõô$/óôø/) && (m/áóôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äõôóñ$/óôøóñ/) && (m/áóôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îõ$/ñôø/) && (m/íñôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îõóø$/ñôøóñ/) && (m/íñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåí$/ñôø/) && (m/íñôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåíóñ$/ñôøóñ/) && (m/íñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåûø$/ñôø/) && (m/íñôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåûøóñ$/ñôøóñ/) && (m/íñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåôå$/ñôø/) && (m/íñôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåôåóø$/ñôøóñ/) && (m/íñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåô$/ñôø/) && (m/íñôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îåôóñ$/ñôøóñ/) && (m/íñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îõô$/ñôø/) && (m/íñôø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/îõôóñ$/ñôøóñ/) && (m/íñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õ$/é/) && (m/òáóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åí$/é/) && (m/òáóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åûø$/é/) && (m/òáóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åôå$/é/) && (m/òáóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/åô$/é/) && (m/òáóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/õô$/é/) && (m/òáóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äõ$/óôé/) && (m/÷åóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äõóø$/óôéóø/) && (m/÷åóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåí$/óôé/) && (m/÷åóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåíóñ$/óôéóø/) && (m/÷åóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåûø$/óôé/) && (m/÷åóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåûøóñ$/óôéóø/) && (m/÷åóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåôå$/óôé/) && (m/÷åóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåôåóø$/óôéóø/) && (m/÷åóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåô$/óôé/) && (m/÷åóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äåôóñ$/óôéóø/) && (m/÷åóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äõô$/óôé/) && (m/÷åóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/äõôóñ$/óôéóø/) && (m/÷åóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôõ$/óôé/) && (m/ìåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôõóø$/óôéóø/) && (m/ìåóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåí$/óôé/) && (m/ìåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåíóñ$/óôéóø/) && (m/ìåóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåûø$/óôé/) && (m/ìåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåûøóñ$/óôéóø/) && (m/ìåóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåôå$/óôé/) && (m/ìåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåôåóø$/óôéóø/) && (m/ìåóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåô$/óôé/) && (m/ìåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôåôóñ$/óôéóø/) && (m/ìåóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôõô$/óôé/) && (m/ìåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ôõôóñ$/óôéóø/) && (m/ìåóôéóø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/âõ$/óôé/) && (m/òåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/âåí$/óôé/) && (m/òåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/âåûø$/óôé/) && (m/òåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/âåôå$/óôé/) && (m/òåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/âåô$/óôé/) && (m/òåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/âõô$/óôé/) && (m/òåóôé$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/çõ$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåí$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåûø$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåôå$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/öåô$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/çõô$/þø/) && (m/þø$/) && ($a=$$words{$_}) && ($a=~m/Y/)) { $nf.="$_/Y "; } #------------------------------------- $_=$uword; if ((s/ê$/ôø/) && (m/[áåñ]ôø$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/êóñ$/ôøóñ/) && (m/[áåñ]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/êôå$/ôø/) && (m/[áåñ]ôø$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/êôåóø$/ôøóñ/) && (m/[áåñ]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/$/ôø/) && (m/éôø$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/å$/ø/) && (m/éôø$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/óø$/ôøóñ/) && (m/éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/ôåóø$/ôøóñ/) && (m/éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/é$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/éôå$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/éóø$/ïôøóñ/) && (m/ïôøóñ$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/éôåóø$/ïôøóñ/) && (m/ïôøóñ$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/é$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/éôå$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/éóø$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/éôåóø$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/ïê$/ùôø/) && (m/ùôø$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/ïêôå$/ùôø/) && (m/ùôø$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/ïêóñ$/ùôøóñ/) && (m/ùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/ïêôåóø$/ùôøóñ/) && (m/ùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/B/)) { $nf.="$_/B "; } #------------------------------------- $_=$uword; if ((s/õê$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/õêóñ$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/õêôå$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/õêôåóø$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/õê$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/õêôå$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/õêóñ$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/õêôåóø$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/àê$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/àêôå$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/àêóñ$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/àêôåóø$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/é$/áôø/) && (m/[öþ]áôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/éóø$/áôøóñ/) && (m/[öþ]áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/ûé$/óáôø/) && (m/óáôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/ûéôå$/óáôø/) && (m/óáôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/ûéóø$/óáôøóñ/) && (m/óáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/ûéôåóø$/óáôøóñ/) && (m/óáôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/ê$/éôø/) && (m/[áåï]éôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/êôå$/éôø/) && (m/[áåï]éôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/êóñ$/éôøóñ/) && (m/[áåï]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/êôåóø$/éôøóñ/) && (m/[áåï]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/ø$/éôø/) && (m/[^áåï]éôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/øôå$/éôø/) && (m/[^áåï]éôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/øóñ$/éôøóñ/) && (m/[^áåï]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/øôåóø$/éôøóñ/) && (m/[^áåï]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/ø$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/øôå$/õôø/) && (m/õôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/øóñ$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/øôåóø$/õôøóñ/) && (m/õôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/ê$/ñôø/) && (m/[áåïõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/êôå$/ñôø/) && (m/[áåïõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/êóñ$/ñôøóñ/) && (m/[áåïõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/êôåóø$/ñôøóñ/) && (m/[áåïõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/é$/åôø/) && (m/åôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/éóø$/åôøóñ/) && (m/åôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/éôå$/åôø/) && (m/åôø$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/éôåóø$/åôøóñ/) && (m/åôøóñ$/) && ($a=$$words{$_}) && ($a=~m/T/)) { $nf.="$_/T "; } #------------------------------------- $_=$uword; if ((s/ñ$/ôø/) && (m/[áå]ôø$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/ñóø$/ôøóñ/) && (m/[áå]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/ñ$/ôø/) && (m/[^áåïõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/ñóø$/ôøóñ/) && (m/[^áåïõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/$/ôø/) && (m/[áåïõ]ñôø$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/óø$/ôøóñ/) && (m/[áåïõ]ñôøóñ$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/ñ$/éôø/) && (m/[^öþûý]éôø$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/ñóø$/éôøóñ/) && (m/[^öþûý]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/á$/éôø/) && (m/[öþûý]éôø$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/áóø$/éôøóñ/) && (m/[öþûý]éôøóñ$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/ïñ$/ùôø/) && (m/ùôø$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/ïñóø$/ùôøóñ/) && (m/ùôøóñ$/) && ($a=$$words{$_}) && ($a=~m/P/)) { $nf.="$_/P "; } #------------------------------------- $_=$uword; if ((s/õñ$/å÷áôø/) && (m/[öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Q/)) { $nf.="$_/Q "; } #------------------------------------- $_=$uword; if ((s/õñóø$/å÷áôøóñ/) && (m/[öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Q/)) { $nf.="$_/Q "; } #------------------------------------- $_=$uword; if ((s/àñ$/å÷áôø/) && (m/[^öûýþã]å÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Q/)) { $nf.="$_/Q "; } #------------------------------------- $_=$uword; if ((s/àñóø$/å÷áôøóñ/) && (m/[^öûýþã]å÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Q/)) { $nf.="$_/Q "; } #------------------------------------- $_=$uword; if ((s/õñ$/ï÷áôø/) && (m/ï÷áôø$/) && ($a=$$words{$_}) && ($a=~m/Q/)) { $nf.="$_/Q "; } #------------------------------------- $_=$uword; if ((s/õñóø$/ï÷áôøóñ/) && (m/ï÷áôøóñ$/) && ($a=$$words{$_}) && ($a=~m/Q/)) { $nf.="$_/Q "; } #------------------------------------- $_=$uword; if ((s/÷$/ôø/) && (m/[áåéïõùñ]ôø$/) && ($a=$$words{$_}) && ($a=~m/R/)) { $nf.="$_/R "; } #------------------------------------- $_=$uword; if ((s/÷ûéóø$/ôøóñ/) && (m/[áåéïõùñ]ôøóñ$/) && ($a=$$words{$_}) && ($a=~m/R/)) { $nf.="$_/R "; } #------------------------------------- $_=$uword; if ((s/÷$/óôø/) && (m/óôø$/) && ($a=$$words{$_}) && ($a=~m/R/)) { $nf.="$_/R "; } #------------------------------------- $_=$uword; if ((s/÷ûéóø$/óôøóñ/) && (m/óôøóñ$/) && ($a=$$words{$_}) && ($a=~m/R/)) { $nf.="$_/R "; } #------------------------------------- $_=$uword; if ((s/ï$/ùê/) && (m/[÷ìîòô]ùê$/) && ($a=$$words{$_}) && ($a=~m/Z/)) { $nf.="$_/Z "; } #------------------------------------- $_=$uword; if ((s/$/ê/) && (m/[óã]ëéê$/) && ($a=$$words{$_}) && ($a=~m/Z/)) { $nf.="$_/Z "; } #------------------------------------- $_=$uword; if ((s/å$/éê/) && (m/ýéê$/) && ($a=$$words{$_}) && ($a=~m/Z/)) { $nf.="$_/Z "; } #------------------------------------- $_=$uword; if ((s/ïçï$/ùê/) && (m/[^ã]ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åçï$/ùê/) && (m/ãùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïíõ$/ùê/) && (m/[^ã]ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åíõ$/ùê/) && (m/ãùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/í$/ê/) && (m/ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïí$/ùê/) && (m/[^ã]ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åí$/ùê/) && (m/ãùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/å$/ê/) && (m/ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/è$/ê/) && (m/ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/íé$/ê/) && (m/ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/áñ$/ùê/) && (m/ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïê$/ùê/) && (m/[^ã]ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïà$/ùê/) && (m/[^ã]ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åê$/ùê/) && (m/ãùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/õà$/ùê/) && (m/ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïå$/ùê/) && (m/[^ã]ùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åå$/ùê/) && (m/ãùê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïçï$/éê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïíõ$/éê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/í$/ê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïí$/éê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/å$/ê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/è$/ê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/íé$/ê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/áñ$/éê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïê$/éê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïà$/éê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/õà$/éê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïå$/éê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åçï$/éê/) && (m/[öîòûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åíõ$/éê/) && (m/[öîòûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/í$/ê/) && (m/[öîòûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åí$/éê/) && (m/[öîòûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/å$/ê/) && (m/[öîòûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/è$/ê/) && (m/[öîòûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/íé$/ê/) && (m/[öîòûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åçïóñ$/éêóñ/) && (m/[ûý]éêóñ$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åíõóñ$/éêóñ/) && (m/[ûý]éêóñ$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/éíóñ$/éêóñ/) && (m/[ûý]éêóñ$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åíóñ$/éêóñ/) && (m/[ûý]éêóñ$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/éåóñ$/éêóñ/) && (m/[ûý]éêóñ$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/éèóñ$/éêóñ/) && (m/[ûý]éêóñ$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/éíéóñ$/éêóñ/) && (m/[ûý]éêóñ$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ññ$/éê/) && (m/îéê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/áñ$/éê/) && (m/[öûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åê$/éê/) && (m/[öîûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åà$/éê/) && (m/[öîûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/àà$/éê/) && (m/îéê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/õà$/éê/) && (m/[öûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åå$/éê/) && (m/[öîûýþ]éê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/áñóñ$/éêóñ/) && (m/[ûý]éêóñ$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/åêóñ$/éêóñ/) && (m/[ûý]éêóñ$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/õàóñ$/éêóñ/) && (m/[ûý]éêóñ$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ååóñ$/éêóñ/) && (m/[ûý]éêóñ$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïçï$/ïê/) && (m/ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïíõ$/ïê/) && (m/ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/éí$/ïê/) && (m/[çöëèûýþ]ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ùí$/ïê/) && (m/[^çöëèûýþ]ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïí$/ïê/) && (m/ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/éå$/ïê/) && (m/[çöëèûýþ]ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ùå$/ïê/) && (m/[^çöëèûýþ]ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/éè$/ïê/) && (m/[çöëèûýþ]ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ùè$/ïê/) && (m/[^çöëèûýþ]ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/éíé$/ïê/) && (m/[çöëèûýþ]ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ùíé$/ïê/) && (m/[^çöëèûýþ]ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/áñ$/ïê/) && (m/ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/õà$/ïê/) && (m/ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïå$/ïê/) && (m/ïê$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïçï$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïíõ$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ùí$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïí$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/á$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïê$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/õ$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ï$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ù$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ùè$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ùíé$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/á$//) && (m/÷$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ï$//) && (m/÷$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/õ$//) && (m/÷$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïê$//) && (m/÷$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ïí$//) && (m/÷$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ù$//) && (m/÷$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ùè$//) && (m/÷$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ùí$//) && (m/÷$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/ùíé$//) && (m/÷$/) && ($a=$$words{$_}) && ($a=~m/A/)) { $nf.="$_/A "; } #------------------------------------- $_=$uword; if ((s/$/ùê/) && (m/[^î]ùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/á$/ùê/) && (m/[^î]ùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/ï$/ùê/) && (m/[^î]ùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/ù$/ùê/) && (m/[^î]ùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/åî$/îùê/) && (m/[^åêìîø]îùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/$/ùê/) && (m/åîùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/åî$/êîùê/) && (m/êîùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/ïî$/îùê/) && (m/ìîùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/åî$/øîùê/) && (m/øîùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/îá$/îùê/) && (m/[^î]îùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/îï$/îùê/) && (m/[^î]îùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/îù$/îùê/) && (m/[^î]îùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/ïë$/ëéê/) && (m/[^áåéêïõùø]ëéê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/$/éê/) && (m/[áåéïõù]ëéê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/åë$/êëéê/) && (m/êëéê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/åë$/øëéê/) && (m/øëéê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/$/éê/) && (m/[çöþèý]éê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/á$/éê/) && (m/[çöëèþý]éê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/ï$/éê/) && (m/[çëè]éê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/å$/éê/) && (m/[öþý]éê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/é$/éê/) && (m/[çöëèþý]éê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/$/ïê/) && (m/ïê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/á$/ïê/) && (m/ïê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/ï$/ïê/) && (m/ïê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/ù$/ïê/) && (m/[^çè]ïê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/é$/ïê/) && (m/[çè]ïê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/$/îùê/) && (m/îîùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/á$/îùê/) && (m/îîùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/ï$/îùê/) && (m/îîùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/ù$/îùê/) && (m/îîùê$/) && ($a=$$words{$_}) && ($a=~m/S/)) { $nf.="$_/S "; } #------------------------------------- $_=$uword; if ((s/á$/ùê/) && (m/îîùê$/) && ($a=$$words{$_}) && ($a=~m/X/)) { $nf.="$_/X "; } #------------------------------------- $_=$uword; if ((s/ï$/ùê/) && (m/îîùê$/) && ($a=$$words{$_}) && ($a=~m/X/)) { $nf.="$_/X "; } #------------------------------------- $_=$uword; if ((s/ù$/ùê/) && (m/îîùê$/) && ($a=$$words{$_}) && ($a=~m/X/)) { $nf.="$_/X "; } #------------------------------------- $_=$uword; if ((s/åå$/ùê/) && (m/ùê$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/åê$/ùê/) && (m/ùê$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/ê$/å/) && (m/åå$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/ñ$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/à$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/åí$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/å$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/é$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/å$/ñ/) && (m/[^é]ñ$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/à$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/åê$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/åà$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/E/)) { $nf.="$_/E "; } #------------------------------------- $_=$uword; if ((s/ù$/á/) && (m/[^çöëèþûý]á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/é$/á/) && (m/[çöëèþûý]á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/å$/á/) && (m/á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/õ$/á/) && (m/á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/ïê$/á/) && (m/[^öãþûý]á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/ïà$/á/) && (m/[^öãþûý]á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/åê$/á/) && (m/[öãþûý]á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/åà$/á/) && (m/[öãþûý]á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/$/á/) && (m/[^ë]á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/ïë$/ëá/) && (m/[^áåöéêïõãþûøùàñ]ëá$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/ë$/ëá/) && (m/[áåéïõùàñ]ëá$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/åë$/ëá/) && (m/[öãþû]ëá$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/åë$/êëá/) && (m/êëá$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/åë$/øëá/) && (m/øëá$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/í$//) && (m/á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/íé$//) && (m/á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/è$//) && (m/á$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/é$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/å$/ñ/) && (m/[^é]ñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/à$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/åê$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/åà$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/ê$/ñ/) && (m/[åéõ]ñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/åî$/îñ/) && (m/[^áåúéêïõùø]îñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/ø$/ñ/) && (m/[áåéïõù]îñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/åî$/êîñ/) && (m/êîñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/åî$/øîñ/) && (m/øîñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/í$//) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/íé$//) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/è$//) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/I/)) { $nf.="$_/I "; } #------------------------------------- $_=$uword; if ((s/ù$/á/) && (m/[^çöëèþûý]á$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/é$/á/) && (m/[çöëèþûý]á$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/å$/á/) && (m/á$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/õ$/á/) && (m/á$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/ïê$/á/) && (m/[^öãþûý]á$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/ïà$/á/) && (m/[^öãþûý]á$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/åê$/á/) && (m/[öãþûý]á$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/åà$/á/) && (m/[öãþûý]á$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/é$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/å$/ñ/) && (m/[^é]ñ$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/à$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/åê$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/åà$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/H/)) { $nf.="$_/H "; } #------------------------------------- $_=$uword; if ((s/á$//) && (m/[^åêïø]$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/õ$//) && (m/[^åêïø]$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ïí$//) && (m/[^åöêïãþûýø]$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/å$//) && (m/[^åêïø]$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ù$//) && (m/[^çåöêëïèþûýø]$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/é$//) && (m/[çöëèþûý]$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/åê$//) && (m/[öþûý]$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ï÷$//) && (m/[^åöêïãþûýø]$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/áí$//) && (m/[^åêïø]$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/áíé$//) && (m/[^åêïø]$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/áè$//) && (m/[^åêïø]$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñ$/ê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/à$/ê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/åí$/ê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/å$/ê/) && (m/[^é]ê$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/é$/ê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/é$/ê/) && (m/[áåïõàñ]ê$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/å÷$/ê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñí$/ê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñíé$/ê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñè$/ê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñ$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/à$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/åí$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/å$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/é$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/åê$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñí$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñíé$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñè$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñ$/å/) && (m/[^öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/á$/å/) && (m/[öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/à$/å/) && (m/[^öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/õ$/å/) && (m/[öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/í$//) && (m/å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/é$/å/) && (m/éå$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/åê$/å/) && (m/[^öéãýø]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/$/å/) && (m/[öý]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ê$/å/) && (m/éå$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/éê$/øå/) && (m/øå$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñí$/å/) && (m/[^öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/áí$/å/) && (m/[öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñíé$/å/) && (m/[^öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/áíé$/å/) && (m/[öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/ñè$/å/) && (m/[^öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/áè$/å/) && (m/[öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/á$/ï/) && (m/ï$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/õ$/ï/) && (m/ï$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/í$//) && (m/ï$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/å$/ï/) && (m/ï$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/é$/ï/) && (m/[éþû]ëï$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/$/ï/) && (m/[÷çäóô]ï$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/áí$/ï/) && (m/ï$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/áíé$/ï/) && (m/ï$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/áè$/ï/) && (m/ï$/) && ($a=$$words{$_}) && ($a=~m/K/)) { $nf.="$_/K "; } #------------------------------------- $_=$uword; if ((s/á$//) && (m/[^åêïø]$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/õ$//) && (m/[^åêïø]$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/ïí$//) && (m/[^åöêïãþûýø]$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/å$//) && (m/[^åêïø]$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/ñ$/ê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/à$/ê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/åí$/ê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/å$/ê/) && (m/[^é]ê$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/é$/ê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/ñ$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/à$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/åí$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/å$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/ñ$/å/) && (m/[^öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/á$/å/) && (m/[öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/à$/å/) && (m/[^öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/õ$/å/) && (m/[öãûý]å$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/í$//) && (m/å$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/é$/å/) && (m/éå$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/á$/ï/) && (m/ï$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/õ$/ï/) && (m/ï$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/í$//) && (m/ï$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/å$/ï/) && (m/ï$/) && ($a=$$words{$_}) && ($a=~m/J/)) { $nf.="$_/J "; } #------------------------------------- $_=$uword; if ((s/é$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/à$//) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/åê$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/áí$/ø/) && (m/[öþûý]ø$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/ñí$/ø/) && (m/[^öþûý]ø$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/áíé$/ø/) && (m/[öþûý]ø$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/ñíé$/ø/) && (m/[^öþûý]ø$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/áè$/ø/) && (m/[öþûý]ø$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/ñè$/ø/) && (m/[^öþûý]ø$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/á$//) && (m/[^ø]$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/õ$//) && (m/[^ø]$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/ïí$//) && (m/[^öãþûýø]$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/å$//) && (m/[^ø]$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/ï÷$//) && (m/[^öãþûýø]$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/áí$//) && (m/[^ø]$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/áíé$//) && (m/[^ø]$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/áè$//) && (m/[^ø]$/) && ($a=$$words{$_}) && ($a=~m/N/)) { $nf.="$_/N "; } #------------------------------------- $_=$uword; if ((s/é$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/à$//) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/ëá$/ïë/) && (m/îïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/ëõ$/ïë/) && (m/îïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/ëïí$/ïë/) && (m/îïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/ëå$/ïë/) && (m/îïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/ñôá$/åîïë/) && (m/åîïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/áôá$/ïîïë/) && (m/ïîïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/ñô$/åîïë/) && (m/åîïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/áô$/ïîïë/) && (m/ïîïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/ñôáí$/åîïë/) && (m/åîïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/áôáí$/ïîïë/) && (m/ïîïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/ñôáíé$/åîïë/) && (m/åîïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/áôáíé$/ïîïë/) && (m/ïîïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/ñôáè$/åîïë/) && (m/åîïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/áôáè$/ïîïë/) && (m/ïîïë$/) && ($a=$$words{$_}) && ($a=~m/F/)) { $nf.="$_/F "; } #------------------------------------- $_=$uword; if ((s/øåçï$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øåíõ$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øéí$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øåí$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øñ$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øåê$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øà$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øå$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øé$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øéè$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øéíé$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/îñ$/åîø/) && (m/åîø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/îà$/åîø/) && (m/åîø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/îåí$/åîø/) && (m/åîø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/îå$/åîø/) && (m/åîø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/îé$/åîø/) && (m/åîø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/îåê$/åîø/) && (m/åîø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/îñí$/åîø/) && (m/åîø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/îñíé$/åîø/) && (m/åîø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/îñè$/åîø/) && (m/åîø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëá$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëõ$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëïí$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëå$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëé$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëï÷$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëáí$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëáíé$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëáè$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ôñ$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ôà$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ôåí$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ôå$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ôé$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ôåê$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ôñí$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ôñíé$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ôñè$/ïôø/) && (m/ïôø$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ãá$/åã/) && (m/[^áåéïì]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/êãá$/åã/) && (m/[áåéï]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øãá$/åã/) && (m/ìåã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ãõ$/åã/) && (m/[^áåéïì]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/êãõ$/åã/) && (m/[áåéï]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øãõ$/åã/) && (m/ìåã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/êãåí$/åã/) && (m/[áåé]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ãå$/åã/) && (m/[^áåéïì]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/êãå$/åã/) && (m/[áåéï]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øãå$/åã/) && (m/ìåã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ãù$/åã/) && (m/[^áåéïì]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/êãù$/åã/) && (m/[áåéï]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øãù$/åã/) && (m/ìåã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/å÷$//) && (m/[áîòñ]ã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/êãå÷$/åã/) && (m/[áåé]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ãáí$/åã/) && (m/[^áåéïì]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/êãáí$/åã/) && (m/[áåéï]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øãáí$/åã/) && (m/ìåã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ãáíé$/åã/) && (m/[^áåéïì]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/êãáíé$/åã/) && (m/[áåéï]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øãáíé$/åã/) && (m/ìåã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ãáè$/åã/) && (m/[^áåéïì]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/êãáè$/åã/) && (m/[áåéï]åã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øãáè$/åã/) && (m/ìåã$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëá$/åë/) && (m/[öþû]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øëá$/åë/) && (m/[ìîò]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëõ$/åë/) && (m/[öþû]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øëõ$/åë/) && (m/[ìîò]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëïí$/åë/) && (m/[öþû]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øëïí$/åë/) && (m/[ìîò]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëå$/åë/) && (m/[öþû]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øëå$/åë/) && (m/[ìîò]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëé$/åë/) && (m/[öþû]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øëé$/åë/) && (m/[ìîò]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëï÷$/åë/) && (m/[öþû]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øëï÷$/åë/) && (m/[ìîò]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëáí$/åë/) && (m/[öþû]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øëáí$/åë/) && (m/[ìîò]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëáíé$/åë/) && (m/[öþû]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øëáíé$/åë/) && (m/[ìîò]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ëáè$/åë/) && (m/[öþû]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/øëáè$/åë/) && (m/[ìîò]åë$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ìá$/åì/) && (m/åì$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ìõ$/åì/) && (m/åì$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ìïí$/åì/) && (m/åì$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ìå$/åì/) && (m/åì$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ìù$/åì/) && (m/åì$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ìï÷$/åì/) && (m/åì$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ìáí$/åì/) && (m/åì$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ìáíé$/åì/) && (m/åì$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ìáè$/åì/) && (m/åì$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ñí$/é/) && (m/[áâäåéìîïòóô]é$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/áí$/é/) && (m/[^áâäåéìîïòóô]é$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ñíé$/é/) && (m/[áâåéìîïòó]é$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ñíé$/é/) && (m/[áòó]ôé$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/áíé$/é/) && (m/[^áâäåéìîïòóô]é$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ñè$/é/) && (m/[áâäåéìîïòóô]é$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/áè$/é/) && (m/[^áâäåéìîïòóô]é$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/áí$/ù/) && (m/ù$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/áíé$/ù/) && (m/ù$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/áè$/ù/) && (m/ù$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/í$//) && (m/[áñ]$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/íé$//) && (m/[áñ]$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/è$//) && (m/[áñ]$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/á$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/õ$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ïí$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/å$//) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/å$/éî/) && (m/îéî$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/ù$/éî/) && (m/òéî$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/$/éî/) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/áí$/éî/) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/áíé$/éî/) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/áè$/éî/) && (m/éî$/) && ($a=$$words{$_}) && ($a=~m/O/)) { $nf.="$_/O "; } #------------------------------------- $_=$uword; if ((s/á$//) && (m/[^åêëïøñ]$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/õ$//) && (m/[^åêëïøñ]$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ùí$//) && (m/[^åöêëïãþûýøñ]$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/å$//) && (m/[^åêëïøñ]$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ïçï$/éê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ïíõ$/éê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/í$/ê/) && (m/ê$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/í$/ê/) && (m/[^é]ê$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ïí$/éê/) && (m/éê$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ëá$/åë/) && (m/åë$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ëõ$/åë/) && (m/åë$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ëïí$/åë/) && (m/åë$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ëå$/åë/) && (m/åë$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ëá$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ëõ$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ëïí$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ëå$/ïë/) && (m/ïë$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ñ$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/à$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/åí$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/å$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/é$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/åê$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ñí$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ñíé$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ñè$/ø/) && (m/ø$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/é$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/å$/ñ/) && (m/[^é]ñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/à$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/åê$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/åà$/ñ/) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ê$/ñ/) && (m/[åéõ]ñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/åî$/îñ/) && (m/[^áåúéêïõùø]îñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/ø$/ñ/) && (m/[áåéïõù]îñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/åî$/êîñ/) && (m/êîñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/åî$/øîñ/) && (m/øîñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/í$//) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/íé$//) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } #------------------------------------- $_=$uword; if ((s/è$//) && (m/ñ$/) && ($a=$$words{$_}) && ($a=~m/G/)) { $nf.="$_/G "; } $_=$uword; if ($$words{$_}) { $nf.="$_/! "; } return $nf; } 1