Displaying 1 result from an estimated 1 matches for "entscale".
2000 May 19
0
I present: The Elusive 'fixprogs' script
...'s entropy rate as well,
but this may not survive the next release.
Ta,
-Andre'
--
Andre Lucas <andre.lucas at dial.pipex.com>
-------------- next part --------------
#!/usr/bin/perl
#
# fixprogs - run through the list of entropy commands and
# score out the losers
#
$entscale = 50; # divisor for optional entropy measurement
sub usage {
return("Usage: $0 <command file>\n");
}
if (($#ARGV == -1) || ($#ARGV>1)) {
die(&usage);
}
# 'undocumented' option - run ent (in second param) on the output
if ($#ARGV==1) {
$entcmd=$ARGV[1]
} else...