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