Möglichkeiten bei der Namensgebung von Arrays

[Stefan Kammler]

Ich hätte da mal folgenden Quuelltext, der leider keine Ausgabe bewirkt:

$NewsAnzahl = @News;

$w = 6;
$x = 0;

@Artikel = ();

while($x <= $NewsAnzahl-1) {

if($x == $w) {
push (@Artikel, @Artikelteil);
@Artikelteil = ();
$w += 6;
}
push(@Artikelteil, $News[$x]);
$x++;
}

print "@{$Artikel[0]}";

Wenn ich in der if-Schleife den @Artikelteil ausgeben lass, zeigt er den (fast) korrekten Inhalt des Arrays an.