use constant haveMod => $mod::VERSION; print haveMod ? "goodMod" : "badMod";