print "Erste Hälfte:".join('',$zeichen[0..int(@zeichen/2)])."\n";
print "Erste Zweite:".join('',$zeichen[int(@zeichen/2), $#zeichen])."\n";