/* Haus�bung 1 Gruppe 2 Programm 2*/
class=bsf.loadClass("java.security.MessageDigest")
md=class~getInstance("SHA-512")
Data="This is a programe written with BSF4ooRexx!"
arrayData=BsfRawBytes(Data)
arrayDigest=md~digest(arrayData)
digest=BsfRawBytes(arrayDigest)
say "Data        :" pp(data)
say "Digest (raw):" pp(digest)
say "Digest (hex):" digest~c2x

::requires BSF.CLS