my $id = "";
for (1..18) { $id .= ('A'..'Z','a'..'z','0'..'9')[int(rand(62))];}