modify test (no Digest::SHA)