Select Code to Download

my $generated_password = &GeneratePassword;

sub GeneratePassword {
  my $password = `passwdgen -pa --length=6`;
...
  chomp($password);
  return($password);
}