Evaluated proc bin2str {binary {sep " "} {endian B}} {join [chunk [binary format $endian* $binary] 8] $sep}