my $hash_w = { w => 100 };
my $hash_x = { x => 200 };
my $hash_y = {}; # no value, but in other cases it can have one
my $hash_z = { z => 300 };
####
300 # from z
####
my $w = values %$hash_w;
my $x = values %$hash_x;
my $y = values %$hash_y;
my $z = values %$hash_z;
my @all,
push @all, $w,$x,$y,$z;
my $max_val = (sort @all)[0];