Hallo,
ich würde gerne den Code
my @ar = ([ [], [], [] ],
[ [], [], [] ]);
durch etwas weniger hart kodiertes ersetzen. Mein erster Versuch sah so aus:
my @ar = map{[([]) x 3]}(0..1);
Das führt aber zu einem Array, das in der Dumper-Ausgabe so aussieht:
$VAR1 = [
[],
$VAR1->[0],
$VAR1->[0]
];
$VAR2 = [
[],
$VAR2->[0],
$VAR2->[0]
];
Kann mir jemand sagen, wie man das richtig macht?