Hallo,
Perl? Keine Ahnung
MySQL? LAST_INSERT_ID
Ist das nicht unsicher? Was, wenn fast zeitgleich zwei Einträge stattfinden? Wenn also bis Last_Instert_ID ausgeführt wurde ein weiterer Eintrag in der DB gemacht wurde?
Gruß
Christian
-- 
Selfcode: fo:| ch:{ rl:( br:> n4:~ ie:% mo:} va:) de:< zu:| fl:( ss:) ls:> js:{
  Selfcode: fo:| ch:{ rl:( br:> n4:~ ie:% mo:} va:) de:< zu:| fl:( ss:) ls:> js:{
 nicht angemeldet
 nicht angemeldet