Thread anfängerfrage zu perl und mysql
(10 answers)
Opened by CyrusTV at 2008-04-08 11:11 Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 # Befehl für zweite Tabelle, mit ?-Notation (siehe auch Wiki-Artikel) my $statement = qq~SELECT Zeit FROM tabelle2 WHERE MAC = ?~; # wieder ein prepare() my $sth = $data2->prepare( $statement ) or die $data2->errstr; # für die Debug-Ausgabe use Data::Dumper; while(@bt_geraet1 = $prepare_abfrage1->fetchrow_array) { print $bt_geraet1[0]." ".$bt_geraet1[1]." \n"; # Abfrage auf 2. Tabelle ausführen und MAC-Adresse verwenden $sth->execute( $bt_geraet1[0] ) or die $data2->errstr; my $ergebnis = $sth->fetchall_arrayref(); # Debug-Ausgabe print Dumper $ergebnis; } $prepare_abfrage1->finish(); OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/) -- Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html Perl-Entwicklung: http://perl-services.de/ |