perl $setu/bin/sl/guess_morph/guess-morph.pl $1