Use Digest::SHA module instead of Digest::SHA1