Potreboval by som pomoc, potrebujem slovniky ktore su ulozene v zlozke nakopirovat priamo do perlovskeho kodu, aby boli sucastou programu. Vedel by mi niekto s tym pomoct? Chcem to mat priamo v skripte.

#cesty k slovnikom
$dic_pria = './dict/pria.dic';
$dic_prie = './dict/prie.dic';


mess("Nacitavam slovniky...",0);

mess("Slovnik \^pria : $dic_pria",2);
open(DIC,$dic_pria) || error("nenasiel som slovnik $dic_pria");
while(<DIC>){
chop;
$priaLex{$_}++;
}
close(DIC);

Dakujem za pomoc.