if ( (keys %$VERSION1)[0] eq (keys %$VERSION2)[0]) {print "SAME\n"};