leerzeichen und tabs entfernen - #52612 (Allgemeines zu Perl)

pKai

2005-03-13 17:11

User since
2005-02-18
357 Artikel
BenutzerIn
[default_avatar]

Quote
m Treat string as multiple lines.
s Treat string as single line.

beides bezieht sich zwar "irgendwie" auf die Verarbeitung von "\n", aber dass die das so teuflisch gegensätzlich formuliert haben...
Jedenfalls habe ich schon häufiger Leute gesehen, die davon auf den falschen Pfad gelockt wurden.

Code (perl): (dl )

my $x = qq(1st line\n2nd line\n3rd line\n);

(my $y = $x) =~ s/^\d/_/g;    # useless use of /g
print qq("$y");    # output:"_st line\n2nd line\n3rd line\n" *)

($y = $x) =~ s/^\d/_/mg;
print qq("$y");    # output:"_st line\n_nd line\n_rd line\n"
($y = $x) =~ s/.\d/_/sg;
print qq("$y");    # output:"1st line_nd line_rd line\n"

($y = $x) =~ s/.\d/_/smg;    # useless use of /m
print qq("$y");    # output:"1st line_nd line_rd line\n"

*) \n innerhalb des "output" oben ist ein newline und nicht literal zu lesen.

Edit: überflüssige "my" entfernt. :laugh:
Edit2: Beim Edit vom Board als newline interpretierte \n wieder gerichtet
Edit3: Sehr verwirrend, wie das Board \n innerhalb des perl-tag beim edit zum newline konvertiert. ???
Edit4: offenbar wird \n innerhalb von "perl" (aber nur beim edit?) konvertiert. Fubar?
Edit5: 3.+4. Bsp-s/// angepasst: /s ist kein mod für \s :blush:\n\n

I sense a soul in search of answers.