Posted to tcl by aspect at Mon Nov 28 10:49:21 GMT 2011view pretty

tclsh8.6 [~]package require md5
::md2.0.7
tclsh8.6 [~]::md5::md5
wrong # args: should be "md5 ?-hex? -filename file | string"
while evaluating ::md5::md5
tclsh8.6 [~]::md5::md5 [read [open /etc/hostname]]
'H÷÷þ¯²/Imr÷í
tclsh8.6 [~]::md5::md5 -hex [read [open /etc/hostname]]
270C48F7F7FEAFB22F03496D7211F7ED
tclsh8.6 [~]::md5::md5 -hex -file /etc/hostname
270C48F7F7FEAFB22F03496D7211F7ED