#SQL-Abfrage -500=5Minuten; -50000=5Stunden JJJJMMDDHHMMSS

$sth =$dbh->prepare ("
           SELECT  *
           FROM Daten
          WHERE time BETWEEN sysdate()-500000 AND sysdate()-0
           ");

$sth->execute ();

while
 ( @zeile =$sth->fetchrow_array ())
    {
      printf br
        ("ID = %s, time = %s, gerät = %s, beschreibung = %s, text = %s, index =%s, test = %s" ),
            $id=$zeile[0],
            $time=$zeile[1],
            $geraet=$zeile[2],
            $beschreibung=$zeile[3],
            $text=$zeile[4],
            $index= $zeile[5],
            $test=$zeile[6],
    };

 $dbh1->do
 (qq
    {ID, time, gerät , beschreibung , text, index , test ")
     VALUES(?,?,?,?,?,?,?)
    },
      undef,
            $id,
            $time,
            $geraet,
            $beschreibung,
            $text,
            $index,
            $test,

);