use strict;
use warnings;
use DBI;

our $bpsUser	= <snip>
our $bpsPwd	= <snip>
our $bpsHost	= <snip>
our $bpsConn	= "";


$bpsConn	= DBI->connect("DBI:mysql:database=BPS;host=$bpsHost",
				       $bpsUser, $bpsPwd, {'RaiseError' => 1});


our $query		=
        "SELECT timestamp FROM STATS ORDER BY timestamp ASC LIMIT 1";
our $result		= $bpsConn->prepare($query);
print $result->execute() . "\n";
our @ary		= $result->fetchrow_array();