use Data::Dump::Streamer;
my %Hash;
Dump(\%Hash);
$Hash{'Empty'}[0] = 'no longer';
Dump(\%Hash);
__END__
$HASH1 = {};
$HASH1 = { Empty => [ 'no longer' ] };