my $a;
$a = rand();
$a = rand($a);
rand($a)
