ivolein
17-08-2010, 22:20
Hallo Zusammen,
ich habe ein Problem mit einem Perl-Programm, dass unter Windows läuft aber unter UNIX Probleme macht.
Ich lese eine Datei Zeilenweise ein und wenn eine leere Zeile kommt, soll etwas gemacht werden. Unter Dos klappt es auch nur unter Linux habe ich da noch Probleme - die Leerzeile wird anhand dem RegEx "" erkannt.
Hier ein kl. Code-Schnippsel:
while ( <DATEI> )
{
# Zeichen für Zeilenende abschneiden
chomp;
# Leerzeile
if ( /^$/ )
{
# mach was (Block1)
next;
}
# keine Leerzeile, mach was anderes (Block2)
next;
}
Unter DOS werden die beiden Blöcke aufgerufen unter UNIX nur der zweite.
Bei der Datei handelt es sich um eine per Windows erstellte Datei.
Vielen Dank schon mal für die Hilfe.
Gruß,
Michael
ich habe ein Problem mit einem Perl-Programm, dass unter Windows läuft aber unter UNIX Probleme macht.
Ich lese eine Datei Zeilenweise ein und wenn eine leere Zeile kommt, soll etwas gemacht werden. Unter Dos klappt es auch nur unter Linux habe ich da noch Probleme - die Leerzeile wird anhand dem RegEx "" erkannt.
Hier ein kl. Code-Schnippsel:
while ( <DATEI> )
{
# Zeichen für Zeilenende abschneiden
chomp;
# Leerzeile
if ( /^$/ )
{
# mach was (Block1)
next;
}
# keine Leerzeile, mach was anderes (Block2)
next;
}
Unter DOS werden die beiden Blöcke aufgerufen unter UNIX nur der zweite.
Bei der Datei handelt es sich um eine per Windows erstellte Datei.
Vielen Dank schon mal für die Hilfe.
Gruß,
Michael