HTML-Ausgabe auf mehrere Seiten verteilen - #5107 (Perl/CGI)

Strat

2005-06-16 19:33

User since
2003-08-04
5246 Artikel
ModeratorIn

du verwendest da einfach als link die Variable $actualPage, z.B.

Code: (dl )

1
2
3

use CGI;
my $cgi = CGI->new();
my $actualPage = $cgi->param('actualPage') || 1;

und setzt den Link z.B.

Code: (dl )

print "Zur Seite: ";
for my $i (1..$#pages) {
  print qq~<a href="$script?actualPage=$i">$i</a> ~;
} # for

vermutlich reicht es aus, nur den teilbereich des arrayslices zu erstellen, der fuer die ausgabe benoetigt wird. wie das geht, haengt davon ab, von woher du das array befuellst. Bei einer MySql-Datenbank hilft dir z.B. sowas wie
[sql]SELECT ... FROM ... LIMIT $start,$resultsPerPage
[/sql]\n\n

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/