RosettaCodeData/Task/MD4/Tcl/md4.tcl

5 lines
116 B
Tcl

package require md4
# Use -hex option for hexadecimal output instead of binary
puts [md4::md4 -hex "Rosetta Code"]