Leser: 3
![]() |
|< 1 2 3 4 5 6 7 8 >| | ![]() |
72 Einträge, 8 Seiten |
H3llGhost+2007-11-05 20:31:24--Ich habe ja die $result und da stehen ja die Ergebnisse von der MySQL-Query drin.
Nun würde ich das Ergebnis ein bisschen mal aufsplitten.
Sprich ich habe mehrere Zeilen mit Servern aber ich will von vorne nach hinten durcharbeiten.
Wie kann ich dann nun auf verschiedene Variablen aus dieser Tabelle zugreifen?
Wie frage ich & perlintro
brian's Leitfaden für jedes Perl-ProblemH3llGhost+2007-11-05 21:00:33--Hmm ...
Jetzt verstehe ich garnichts mehr ... :(
Gibt es nicht wie bei PHP einen Befehl extract() oder so?
1 2 3 4
for my $key (sort keys %$hashref) { my $entry = $hashref->{$key}; print "foo: $entry->{foo}\n"; }
Wie frage ich & perlintro
brian's Leitfaden für jedes Perl-Problem1
2
3
4
5
6
7
8
9
10
11
12
13
my $query = "
SELECT
*
FROM
hlstats_Servers
";
my $result = &doQuery($query);
my $hash_ref = $result->fetchrow_hashref();
for my $key (sort keys %$hashref) {
my $entry = $hashref->{$key};
print "foo: $entry->{foo}\n";
}
H3llGhost+2007-11-05 21:37:23--Was habe ich falsch gemacht?
Wie frage ich & perlintro
brian's Leitfaden für jedes Perl-Problem1 2 3 4 5 6 7 8
my $query = " SELECT * FROM hlstats_Servers "; my $result = &doQuery($query); my $hash_ref = $result->fetchrow_arrayref();
1 2 3 4 5 6 7 8 9 10 11
my $query = " SELECT * FROM hlstats_Servers "; my $result = &doQuery($query); my @result2; while(my @row = $result->fetchrow_array()){ push(@result2,\@row); }
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
$VAR1 = '77.237.250.200:27015';
$VAR2 = {
'AddressPort' => '77.237.250.200:27015',
'MinPlayers' => '2',
'MasterServerData' => '7',
'PlayerEventsCommand' => 'ma_hlx_psay',
'BroadCastEventsCommandAnnounce' => 'ma_hlx_csay',
'Mod' => 'MANI',
'MinimumPlayersRank' => '0',
'AdminContact' => 'webmaster@battle55-stats.de',
'BroadCastEvents' => '1',
'AutoTeamBalance' => '0',
'SwitchAdmins' => '0',
'EnablePublicCommands' => '1',
'GameType' => '0',
'BroadCastPlayerActions' => '1',
'BroadCastEventsCommandSteamid' => '1',
'PlayerEvents' => '1',
'BroadCastEventsCommand' => 'ma_hlx_psay',
'SkillMode' => '0',
'AutoBanRetry' => '0',
'PlayerEventsCommandSteamid' => '1',
'TrackServerLoad' => '1',
'ShowStats' => '1',
'PlayerEventsCommandOSD' => 'ma_hlx_msay',
'TKPenalty' => '50',
'HLStatsURL' => 'http://test3.battle55-stats.de',
'SuicidePenalty' => '5',
'MasterServerInterval' => '200',
'IgnoreBots' => '1',
'DisplayResultsInBrowser' => '0'
};
H3llGhost+2007-11-06 21:52:38--Das % bedeutet doch Assoziatives Array oder?
pq+2007-11-05 20:09:58--H3llGhost+2007-11-05 18:55:16--Mir ist gerade was aufgefallen ...
Ich brauche ein assoziatives Array ...
in perl ist das ein hash.
Wie frage ich & perlintro
brian's Leitfaden für jedes Perl-Problem![]() |
|< 1 2 3 4 5 6 7 8 >| | ![]() |
72 Einträge, 8 Seiten |