Leser: 1
8 Einträge, 1 Seite |
my %cols = %{ $query_handle->fetchrow_hashref }
QuoteIf there are no more rows or if an error occurs, then fetchrow_hashref returns an undef. You should check $sth->err afterwards (or use the RaiseError attribute) to discover if the undef returned was due to an error.
1 2 3 4 5 6 7 8
# Warnung verhindern; wenn undef geliefert wird, wird eine Referenz auf # einen leeren anonymen Hash dereferenziert. my %cols = %{ $query_handle->fetchrow_hashref || {} }; # Wenn Hash leer, dann gebe Fehlermeldung aus if ( ! %cols ) { print "No data found; Query error: ", $query_handle->err, "\n"; }
1 2 3 4 5
my $cols = $query_handle->fetchrow_hashref; if( defined( $cols ) ) { print "Datum: $$cols{datum}\n"; } else { die( "No data found; Query error: ", $query_handle->err, "\n" ); }
1 2 3 4 5 6
my %hash = ( key => "value" ); # Erstellen eines Hashs my $hashRef1 = \%hash; # Erstellen einer Referenz auf diesen Hash my $hashRef2 = { key => "value" }; # Erstellen einer Referenz auf einen neuen ("anoynmen") Hash print $hash{key}; # wie gewohnt print $$hashRef1{key}, $$hashRef2{key}; # Das $ ist erforderlich, wenn Du einen Wert dereferenzieren willst print keys( %$hashRef1 ), keys( %{$hashRef2} ); #äquivalente Schreibweisen, dereferenzieren des Hashs.
8 Einträge, 1 Seite |