for (...) {
    my %hash;
    # fülle %hash mit Daten
    # ...
    $grosse_datenstruktur{$foo}{$bar} = \%hash;
}