# Just a sample to indicate the flow (untested) 

            my $pages = $cgi->param{'pages'}||1;
            my $start_limit = shift|| $cgi->param {'start_limit'};

            # Get the record info starting from the
            # $start_limit record and the twenty from it 

            # print "the records \n";

            # print "the $pages at the end of the page ";

            $start_limit += $start_limit;
            $pages += $pages;

            
            # ALSO pass $start_limit and $pages as the hidden parameters to the page occuring next to this