Aber wenn es mit dem Skript Probleme gibt, dann nicht wg. chop, das hier völlig gefahrlos (auch unter Windows) verwendet werden kann, da lt. Skript STDIN ja nicht im binmode() gelesen wird.

Zwei Sachen sind aus meiner Sicht noch bemerkenswert:
[*] Usereingaben, die in Regexen Verwendung finden ($vorname, $nachname) sollten idR mit quotemeta() "sicher" gemacht werden, da sonst über die Eingabe der Regex verwirrend manipuliert werden kann.[*] Eine (nicht abgefangene) Leereingabe zu den Namen führt immer zu "ungültig", da jedes (nichtleere) PW /\b\b/ erfüllt.

Ansonsten funktioniert das gepostete Skript eigentlich so wie erwartet!?