[cgiapp] CGI::Application and HTML::Pager

[Roy Rubin]

Hello,

I am trying to provide some paginated search results and got stock with
compile problems. Can anyone provide an example of using HTML::Pager and
CGI:Application.

Got an error: syntax error at GLX.pm line 69, near "sub d_search " syntax
error at GLX.pm line 90, near "}" Compilation failed in require at
C:\projects\GLX\cgi-bin\engine.pl line 14. BEGIN failed--compilation aborted
at C:\projects\GLX\cgi-bin\engine.pl line 14.

Thanks.

Roy
http://www.irubin.com



<snippet - using just the default samples provided will not compile>

  my $get_data_sub = sub {
     my ($offset, $rows) = @_;
     my @return_array;
     for (my $x = 0; $x < $rows; $x++) {
        push(@return_array, [ $data[$offset + $x]{name},
                              $data[$offset + $x]{age}
                            ]
            );
     }
     return \@return_array;
  }



sub d_search {
        my $self = shift;
        my $q = $self->query();
        my $output;
        my $config = $self->param('config');

        %uservalues = $q->Vars;
        my $thtml = $self->load_tmpl($config->get_base_template_path .
$config->get_search_results, die_on_bad_params => 0);



        $pager = HTML::Pager->new(
                query => $q,
                get_data_callback => whatever(),
                rows => $rv,
                page_size => 15,
                template => $thtml
        );
}


---------------------------------------------------------------------
Web Archive:  http://www.mail-archive.com/cgiapp@lists.vm.com/
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]