Created by [CecilWesterhof]. '''Getting Random Bytes on a *NIX System''' There are several reasons you want to get a set of random bytes. I wrote a version for *NIX systems: ====== proc getRandomBytesNix {count {secure False}} { if $secure { set randFile /dev/random } else { set randFile /dev/urandom } set randDev [open $randFile rb] set random [read $randDev $count] close $randDev return $random } ====== In almost all cases you do not need /dev/random, so normally you would call it like: ====== set random [getRandomBytesNix 16] ====== ---- As always: comments, tips and questions are appreciated. <>Linux | Utilities