Select Code to Download

foreach my $keys1 (keys %{$excel_hash}) {
    print "$keys1\n";
...
    my $value = %{%$excel_hash{$keys1}{$keys2}};
    }
    }

$VAR1 = \{
            '002' => {
...
Name
001
Name