foreach (keys %enthalpy_hash) { ... ##

##

if (exists $hash{$_})    { ...

##

##

foreach (keys %$enthalpy_hash) { ...

##

##

if (exists $hash->{$_})    { ...