Antw: Problem mit Array

Roland Bauer Roland.Bauer at mediaprint.at
Tue Dec 28 05:02:58 CST 1999


* * * vienna-pm-list * * *


Hallo Peter,

warum Deine erste Version nicht funktioniert, weiss ich
nicht, hm ...


aber statt

  @string1 = (@string1, $text);

wuerde ich

 push @string, $text;

verwenden.

und ausserdem: immer "use strict;" verwenden ;-)

folgende loesung ist kuerzer:

# ------------------------------------

use strict; # WICHTIG !!!!!! ;-)

my %x = (a => 1, b => 2);
my %y = (c => 1, d => 2);
my %z = (e => 1, f => 2);

my %alle = (%x, %y, %z);

my @keys = keys %alle;

print "@keys";

# --------------------------------------


wenn man die zwischenvariable %alle wegbringen will,
muss man mit referenzen arbeiten. oder geht das auch
einfacher?

denn keys will unbedingt ein "%", aber (%x, %y, %z) ist eine liste ...

mit anderen worten:

$a . $b   ... verkettet strings
(@a, @b) ... verkettet listen
%{ { %a, %b } } ... verkettet hashes (achtung, trick !!)

# -----------------------------------

use strict;

my %x = (a => 1, b => 2);
my %y = (c => 1, d => 2);
my %z = (e => 1, f => 2);

my @keys = keys %{ { %x, %y, %z } };

print "@keys";

# --------------------------------------------------

roland


--
roland.bauer at mediaprint.at
internet-applikationen
TEL: +43-1-36000/3949

###
You are subscribed to vienna-pm-list
http://www.fff.at/fff/vienna.pm/



More information about the Vienna-pm mailing list