my $query = 'SELECT a_column from table";
my $dbh = however_you_connect;
my $sth =$dbh->do($query);
my $rows_per_page = 10;
my $pages = $sth->rows / $rows_per_page;