igor@20: temp=/tmp/oneliner$$
igor@20: while read l
igor@20: do
igor@20:     dict -h dictd.xdsl.by -d mueller24 "$l" 2> /dev/null | perl -n -e 'print if ($y and not /^\s*$/) ; $y=1 if /'$l'/;' | grep -v _Syn | grep -v _Ant > $temp
igor@20:     if [ `wc -l $temp | awk '{print $1}'` = 1 ]
igor@20:     then
igor@20:         echo -n $l
igor@20:         cat $temp
igor@20:     fi
igor@20: done
igor@20: