@r=('a'..'z','A'..'Z','0'..'9','.','/');
$salt=$r[rand(@r)].$r[rand(@r)];