Evaluated proc bin2dec {bin {sep {}} {endian B}} {str2dec [bin2str $bin $sep $endian]}