5 lines
116 B
Tcl
5 lines
116 B
Tcl
|
package require md4
|
||
|
|
|
||
|
|
# Use -hex option for hexadecimal output instead of binary
|
||
|
|
puts [md4::md4 -hex "Rosetta Code"]
|