Rk::M->set_sql(maxid => q(select max(m) from m));
my $max = +(Rk::M->search_maxid)[0]->{'max(m)'};

##</code><code>##

my $max = $dbh->selectrow_array('select max(m) from m');