Thread perl diff tool (9 answers)
Opened by panthera at 2009-11-19 17:06

bianca
 2009-11-20 15:50
#128372 #128372
User since
2009-09-13
7016 articles
BenutzerIn

user image
Guest panthera
Hallo Renee!

vielen Dank, das würde ich dann einbauen.
Kannst Du mir sagen, was diese Abfrage und diese Zuweisung bedeuten?

Code: (dl )
1
2
3
4
if ( $dls_file =~ /\r\n/ )
{
$dls_file =~ s/\r\n/\n/g;
}


Danke & Grüße

Das sind sog. Regular Expressions (RegEx).
\r ist Wagenrücklauf (für Windows)
\n ist newline, Neue Zeile.
Der erste Regex fragt, ob das enthalten ist und wenn ja ersetzt der zweite Regex alle Vorkommen von Windows \r\n gegen Unix/Linux \n, weil \n reicht. Das zusätzliche \r davor kennt nur Windoof.

Edit: s/kennt nur Windoof/nutzt nur Windoof als Zeilentrenner in ASCII-Dateien/
Last edited: 2009-11-20 16:03:04 +0100 (CET)
10 print "Hallo"
20 goto 10

View full thread perl diff tool