Wir hatten hier schonmal die Problematik angesprochen, dass $_ durch die while-Schleife überschrieben (weil nicht lokalisiert) wird.

@opi: das defined brauchst Du nicht. Das macht Perl automatisch...