use ddmf;
  use jspell;

  my $calao = "/home/jj/cvs/dpl/example/calao.dic";
  interpret(mkdbddmf($calao,{lang => "pt", id=> "dac"} ));