print Dumper(\%hash);
print Dumper(\%hash1);
if(keys %hash == keys %hash1) {

##</code><code>##

use strict;
use warnings;

my %hash;
my %hash1;
if (keys %hash == keys %hash1) {
    print "eq\n";
}
else {
    print "neq\n";
}

__END__

eq