my $number = 1;

my $actualPage = 1;
my $resultsPerPage = 4;
my $count = int((@$array+$resultsPerPage-2)/$resultsPerPage);
my $start = ($actualPage-1)*$resultsPerPage;
my $end = $start+$resultsPerPage-1;

foreach (@$array[$start..$end]) { #Das Array of Hash durchlaufen
        if ($_->{plz} eq $convert && $_->{Geschlecht} eq $temp) { #Wenn in dem aktuellen Element Stadt der eingegebene Ort steht...
            my $pfad_bild = "../bilder/".$_->{Bild_klein}; #Den richtigen Pfad des kleinen Bildes anhängen
            print "<table align=center height=\"60px\"\"><tr><td align=left>ID: </td><td align=left>".$_->{ID}."</a></td>\n"; #Ausgabe der ID
            print "<td rowspan=6 align = left><a href=script.pl?id=$_->{ID};orte=$_->{Stadt}><img src=$pfad_bild border=0></a></td></tr>\n"; #Einfügen des Bildes
            print "<tr><td align=left>Ort: </td><td align=left>".$_->{Stadt}."</td></tr>\n"; #Ausgabe der Stadt
            print "<tr><td align=left>Name: </td><td align=left>".$_->{Name}."</td></tr>\n"; #Ausgabe des Names
            print "<tr><td align=left>Geschlecht: </td><td align=left>".$_->{Geschlecht}."</td></tr>\n"; #Ausgabe Mann oder Frau
            print "<tr><td align = left>Alter: </td><td align = left>".$_->{Alter}."</td></tr>\n"; #Ausgabe des Alters
            print "<tr><td align = left width=\"100\">Groesse: </td><td width=\"500\" align = left>".$_->{Groesse}."</td></tr>\n"; #Ausgabe der Größe
            print "<tr><td colspan=3 align=right><a href=script.pl?id=$_->{ID};plz=$_->{plz};art=$_->{Geschlecht}><b>...Details</b><br><br></td></tr></table><br>"; #Link für Detailsansicht, es wird die ID mitgeschickt um das Element des Arrays zu wissen
        }
        elsif ($_->{plz} eq $convert && $_->{Art} eq $temp) { #Wenn in dem aktuellen Element Stadt der eingegebene Ort steht...
            my $pfad_bild = "../bilder/".$_->{Bild_klein}; #Den richtigen Pfad des kleinen Bildes anhängen
            print "<table align=center height=\"60px\"\"><tr><td align=left>ID: </td><td align=left>".$_->{ID}."</a></td>\n"; #Ausgabe der ID
            print "<td rowspan=4 align = left><a href=script.pl?id=$_->{ID};orte=$_->{Stadt}><img src=$pfad_bild border=0></a></td></tr>\n"; #Einfügen des Bildes
            print "<tr><td align=left>Straße: </td><td align=left>".$_->{Strasse}."</td></tr>\n"; #Ausgabe des Names
            print "<tr><td align=left>Ort: </td><td align=left>".$_->{Stadt}."</td></tr>\n"; #Ausgabe der Stadt
            print "<tr><td align = left width=\"100\">Kontakt: </td><td width=\"500\" align = left>".$_->{Kontakt}."</td></tr>\n"; #Ausgabe der Größe
            print "<tr><td></td></tr>\n";
            print "<tr><td colspan=3 align=right><a href=script.pl?id=$_->{ID};plz=$_->{plz};art=$_->{Art};><b>...Details</b><br><br></td></tr></table><br>"; #Link für Detailsansicht, es wird die ID mitgeschickt um das Element des Arrays zu wissen
        }
}
print "<br><a href=\"../index.html\">zurück</a><br>\n"; #Link zur Startseite
#print "Anzahl der Seiten: ".$count."<br>\n";
print "Seiten: \n";
while ($number<$count) {
print $number++." \n";
}
print "</p>";
print "</div></div>\n";
print "</body></html>\n";