# Befehl für zweite Tabelle, mit ?-Notation (siehe auch Wiki-Artikel)
my $statement = qq~SELECT tabelle2.mac, tabelle1.zeit, tabelle2.zeitspalte FROM tabelle1, tabelle2 WHERE tabelle1.mac = tabelle2.mac~;

my $sth = $data2->prepare( $statement ) or die $data2->errstr;

# für die Debug-Ausgabe
use Data::Dumper;

while( my @row = $sth->fetchrow_array){
         print sprintf "%s -> %s - %s\n", @row;
}
$sth->finish();