Add a timestamp field (epoch time) to each table - int(10) unsigned - and create an index for it, then just select records created in the last minute.

my $min_old = time-60;
my $sth = $dbh->prepare("SELECT * FROM table WHERE timestamp>$min_old"
+);
[download]

Well, that's what I'd do, anyway.

cLive ;-)