my $precision = 8;
for (0..20)
{
  my $var = int(rand($precision));
  print $var/($precision-1), "\n";
}