sub loeschen{
     $input="";
     $in->update(); 
     $output="";
     $out->update(); 
     $ausgabe->delete('0.1', 'end');
}