Thread anfängerfrage zu perl und mysql (10 answers)
Opened by CyrusTV at 2008-04-08 11:11

renee
 2008-04-08 11:23
#108064 #108064
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
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/

View full thread anfängerfrage zu perl und mysql