Ausgabe mit Spezialvariablen- Trennzeichen: Wie hört das wieder auf? (Allgemeines zu Perl)

[thread]6394[/thread]

Ausgabe mit Spezialvariablen- Trennzeichen: Wie hört das wieder auf?

Leser: 1

Gast Gast

2004-07-12 21:33

Hallo!
Wäre nett, wenn mir jemand helfen könnte.
Bin totaler Anfänger...
Also, ich habe ein Array

@array = qw(Piste Party Pulverschnee);

und benutze das Elementtrennzeichen $, bzw $", also

$" = ', ';
print "@array\n";

und erhalte als Ausgabe wie gewünscht:

Piste, Party, Pulverschnee

Wenn ich jetzt witer schreibe und ein neues Array definier,
z. B.

@arrayneu = qw( Sommer Sonne Strand Sangria);

und das ausgeben lasse,

print "@arrayneu";

wird es auch mit den Trennzeichen verknüpft:

Sommer, Sonne, Strand, Sangria,

Wie kann ich das ändern???

DANKE

2004-07-12 22:10

User since
2003-08-04
12208 Artikel
Admin1

sehr perlisch ist es, das $" nur lokal in einem block zu ändern:

Code: (dl )

...
{
  local $" = ", ";
  print "@array";
}
# hier ist $" wieder auf ' ' zurückgesetzt
print "@array2";

du kannst es natürlich auch manuell wieder zurücksetzen,
das wird aber gerne vergessen. spezialvariablen verändere
ich eigentlich immer in einem block mit local()

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

jan

2004-07-12 23:15

User since
2003-08-04
2536 Artikel
ModeratorIn

du koenntest auch einfach die join-funktion nutzen:
print join($trennzeichen, @array);

View all threads created 2004-07-12 21:33.