Zeilenumbruch abfragen - #57230 (Allgemeines zu Perl)

Jamthelaw

2005-08-16 20:26

User since
2005-08-16
9 Artikel
BenutzerIn
[default_avatar]

Hallo zusammen,

Ich habe ein Script das eine Datei zeichenweise ausliest und in einen Array speichert. Ich möchte auch zählen wie viele Zeichen in der Datei vorkommen, möchte aber das der Zeilenumbruch nicht mitgezählt wird.

Code: (dl )

while($actchar = getc(INFILE)){
    push @file, $actchar;
    $laenge++;
}

Kann ich das irgendwie abfragen, ob das aktuelle Zeichen ein CR ist?

Thx schonmal

Greetz
Jamthelaw