if ( $id < $lastrec ){
  print $q->start_form(-name=>'displaynext',-method=>'POST',-action=>'next.cgi'); 
  print "<input type=hidden name=i value='$id'>";
  print "<input type=hidden name=u value='$username'>";
  print $q->submit(-name=>'next',-value=>'next');

  print $q->end_form();
}
if ( $id > $firstrec ){
  print $q->start_form(-name=>'display prev',-method=>'POST',-action=>'prev.cgi');
  print "<input type=hidden name=i value='$id'>";
  print "<input type=hidden name=u value='$username'>";
  print $q->submit(-name=>'prev',-value=>'prev');
  print $q->end_form();
}