Die Leerzeichen am Ende der Zeile kannst Du vermutlich ganz leicht mit einem regulären Ausdruck entfernen: Zum Beispiel könntest Du in PerlProfis Skript in der Subroutine datei_lesen die Zeile chomp($line); ("wirf am Ende von $line alles weg, was wie ein Zeilenumbruch aussieht") durch $line =~ s/\s*$//; ("wirf am Ende von $line alles weg, was Whitespace ist") ersetzen.

Am Rande bemerkt: Auch wenn PerlProfis Skript natürlich für einfach formatierte Daten funktioniert, würde ich bei CSV-Dateien generell lieber mit einem Modul wie Text::CSV, Text::CSV_XS oder DBD::CSV arbeiten, weil man dann keine bösen Überraschungen erlebt, für den Fall, dass in der CSV-Datei doch mal Quotes oder Escapesequenzen vorkommen...\n\n

<!--EDIT|murphy|1177677457-->