my $x;
  $x .= chr(rand(255)) for 1 .. 16; # or more