my @personen = (
    {
        Name => "Hans",
        Alter => 10,
    },
    {
        Name => "Gretel",
        Alter => 9,
    },
);

# Und neue Personen hinzufügen:
push @personen, { Name => "Hexe", Alter => 99 };

# Die zweite Person:
print "Name: $personen[1]{Name}, Alter: $personen[1]{Alter}\n";

# Ganze Struktur ausgeben:
use Data::Dumper;
print Dumper \@personen;