newline an Stringende anhängen (Seite 2) (Allgemeines zu Perl)

[thread]6260[/thread]

newline an Stringende anhängen (Seite 2)

Leser: 3

[E|B]

2004-05-16 13:51

User since
2003-08-08
2561 Artikel
HausmeisterIn

[quote=Ishka,16.05.2004, 01:31]betterworld - du hast sogar einen weiteren gemacht: $string =" /$/\n/; (es sei denn, ich kenne den =" Operator noch nicht)[/quote]
Gibt es den überhaupt? ???

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

Ishka

2004-05-16 14:44

User since
2003-08-04
771 Artikel
HausmeisterIn

ich glaub nicht - aber betterworld hat ihn verwendet ;)

sub z{if(@_){1while$x[$k=rand 10];t($t=$x[$k]=1)}print map"$z[$x[$_]]$_".($_%3?
"":"\n"),1..9}sub t{$j=0;$x[$_+1]==$t&&($j+=2**$_)for 0..8;z,die"Gewinner $z[$t]
"if grep$_==($j&$_),7,56,73,84,146,273,292,448;z,die"Gleichstand\n"if@x>9&&!grep
!$_,@x}@x=4;@z=qw{. [ (};z$^T&1;while(<>){next if$_>9||$x[$_];t$t=$x[$_]=2;z 1}

ronald

2004-05-17 11:08

User since
2003-08-15
76 Artikel
BenutzerIn
[default_avatar]

[quote=alexus-777,15.05.2004, 17:05]Hallo Community,

gibt es andere Möglichkeiten eine newline an Stringende anzuhängen als:

Code: (dl )

$string="$string\n";

Wenn ich obenstehende Variante verwende, bekomme ich ein Fehler wenn ein \ im String steht und \n maskiert.[/quote]
Hallo Alexander,

wenn du das \n an der richtigen Stelle einfügst kann es nicht sein, dass ein \ diesen maskiert.

Der Ausdruck

Code: (dl )

$string = "$string\n";

ist völlig korrekt.
Es funktioniert sogar, wenn $string ein \ am Ende hat:

Code: (dl )

1
2

$string = "abc\\";
$string .= "\n";

Überlegbar ist auch folgendes:

Code: (dl )

$string =~ s/\n*$/\n/;

Dadurch hat der $string am Ende auf jeden Fall ein einziges \n; eal, ob er vorher keines, eines oder mehrere hatte.

View all threads created 2004-05-15 19:05.