{ my @password_chars = ( 0 .. 9, 'A' .. 'Z', 'a' .. 'z' );
	my $num_char = @password_chars;
	sub Pass {
		my $password = '';
		$password .= $password_chars[rand($num_char)] for (1 .. 8);
		return $password;
	}
}