my @users = qw/Albert Bob Charlie/;
foreach my $thisUser ( @users ) {
  my $password = makePassword();
  my $sql = "INSERT INTO login (login, password)
             VALUES (?,?)";
  my $sth = $dbh->prepare($sql);
  $sth->execute($thisUser, $password);
}