À l'aide de selectall_hashref que je selectall_arrayref

Je suis en train de faire quelques exercices pour augmenter mes compétences en Perl et l'un d'eux consiste à relier à une base de données SQL, l'exécution d'une requête, et de retourner les résultats dans un tableau. C'est ce que j'ai à ce jour:

my $search = $_[0];
our $dbh = DBI->connect{"dbi:mysql:dbname=database", "root", "password")
    or die $DBI::errstr;
my $sql = $dbh->selectall_arrayref("SELECT Player from Players_Sport where Sport like '$search'")
    or die $DBI::errstr;
my @array = map { $_->[0] } @$sql;
$dbh->disconnect
    or warn "Disconnection failed: $DBI::errstr\n";
return @array;

Ma prochaine étape est de modifier le code pour renvoyer les résultats d'un algorithme de hachage au lieu d'un tableau, mais je ne suis pas certain de la façon de procéder. Je m'attends à utiliser selectall_hashref, mais tous les exemples en ligne j'ai trouvé une utilisation TOUT. Je veux retourner les résultats, puis créer le hash en étapes distinctes.

OriginalL'auteur user2361820 | 2013-05-13

  1. 6

    À l'aide de la selectall_hashref méthode combine prepare, execute et fetchall_arrayref en un seul appel. Elle renvoie une référence à un tableau contenant une référence à un hachage pour chaque ligne de données récupérées. Addon pour les commentaires précédents de réponses.

    Une verbose la façon de transformer votre selectall_arrayref appel dans le même hachage où ID est votre clé primaire, vous pourriez faire quelque chose comme cela.

    my %rows = ();
for my $i ( 0..$#{$sql} ) {
  my ($id, $player, $sport) = @{$sql->[$i]};
  $rows{$id} = [ $player, $sport ];  
}

    Et maintenant pour y accéder:

    foreach ( sort(keys(%rows)) ) {
   print "$_, -> $rows{$_}->[0], -> $rows{$_}->[1]\n";
}

    Maintenant à l'aide de selectall_hashref, votre appel serait quelque chose comme ceci. L'ID est le primary clé ici.

    my $href = $dbh->selectall_hashref( q/SELECT ID, Player, Sport 
                                      FROM Players_Sport/, q/ID/ );

    Pour accéder à vos clés, vous pouvez utiliser de nombreuses façons, en voici un exemple:

    foreach ( keys %$href ) {
   print "$_, $href->{$_}->{Player}, $href->{$_}->{Sport}\n";
}

    Votre clé primaire est placé comme $_, vos clés, vous pouvez être l'accès de la table de hachage en disant.

    $href->{$_}->{Player}

    Encore, c'est comme dire:

    foreach my $i ( keys %$href ) {
   print "$i, $href->{$i}->{Player}, $href->{$i}->{Sport}\n";
}

    Chaque élément est une boucle dans $i

    OriginalL'auteur hwnd

  2. 3

    Lorsque vous utilisez selectall_hashref vous devez préciser la colonne à utiliser comme clé unique. Spécifiez une colonne vous savez qu'ils ont des valeurs uniques pour chaque ligne, puis il sera de remplir une table de hachage avec la "ligne" des objets à l'aide de la clé de valeurs de colonne comme clé. Chaque "ligne" est lui-même un hashref avec les noms de colonnes comme les clés.

    De l'DBI page:

    $hash_ref = $dbh->selectall_hashref($statement, $key_field);
$hash_ref = $dbh->selectall_hashref($statement, $key_field, \%attr);
$hash_ref = $dbh->selectall_hashref($statement, $key_field, \%attr, @bind_values);

    Dans les trois versions que vous fournissez $key_field pour identifier la colonne qui sera utilisée comme la clé de hachage.

    OriginalL'auteur Jim Garrison

  3. 0

    Hachages de définir une association entre 2 choses, mais qu'est-ce que la clé ou la valeur dans ce cas? En supposant que vous souhaitez un 1 comme valeur:

    my %hash = map { $_, 1 } @array;

    ou,

    my %hash = map { $_->[0], 1 } @$sql;
    Dans ma table MySQL que j'ai, l'ID du Joueur, et le Sport. Je suis saisie d'une recherche", $recherche" via un getopt argument de ligne de commande, et je veux Select * from table où le Sport comme "$recherche". Je suppose que ma clé serait l'ID? Je veux mettre "Basket-ball" dans ma recherche, puis je m'en renvoyer une référence pour les joueurs qui jouent à ce sport. Je suppose que mon "clé" serait l'identité de

    OriginalL'auteur perreal