sub generatePassword {
    my $password = `passwdgen -pa --length=6`;
    $password =~ s/Your password is: (.*)/$1/;
    chomp $password;
    return $password;
}