use strict;
use warnings;

my $closurehash = {1 => {name => 'fake35'}};

print "create hashref\n";
foreach my $key ( keys(%{$closurehash}) ) {
    print "$closurehash->{$key}->{'name'}\n";
}

print "add to hashref\n";
$closurehash->{2}{ "name" } = "test";  # hash ref
foreach my $key ( keys(%{$closurehash}) ) {
    print "$closurehash->{$key}->{'name'}\n";
}

print "delete from hashref\n";
delete $closurehash->{1};  
foreach my $key ( keys(%{$closurehash}) ) {
    print "$closurehash->{$key}->{'name'}\n";
}