sub loeschen{
$in->delete(0, 'end');
$out->delete(0, 'end');
}