entry .e -textvariable q
button .b -text "los" -command { 
    puts [exec agrep $q /usr/dict/ger-eng.txt]
}
pack .e .b