my $limit = 2**32;

my $sid = rand ($limit);
$sid = $limit ^ $sid;


print sprintf "%x\n", $sid;

$sid = rand ($limit);
$sid = $limit ^ $sid;

print sprintf "%x\n", $sid;

$sid = rand ($limit);
$sid = $limit ^ $sid;

print sprintf "%x\n", $sid;

$sid = rand ($limit);
$sid = $limit ^ $sid;

print sprintf "%x\n", $sid;

$sid = rand ($limit);
$sid = $limit ^ $sid;

print sprintf "%x\n", $sid;