my $data = qq(SELECT search, engine, time FROM searches WHERE DATE_SUB+(CURDATE(),INTERVAL 7 DAY) <= time); my $ref = $dbh->selectall_arrayref($data); # For fun you can even check the number of rows returned print "Total Searches: ". ($#{$ref} + 1) ."
\n"; for my $row (0 .. $#{$ref}) { print "$ref->[$row][0] $ref->[$row][1] on $ref->[$row][2]
\n"; }