<perl>
$tmpsessionid=$sessionid;
$datumtmp=datum(jetzt,"Tag0.Monat0");
get "benutzername sort=-datumtmp", benutzerverwaltung;
$ende="0";
$zaehler=0;
get_next(benutzerverwaltung);
while ($ende eq "0")
{
get_next(benutzerverwaltung);
$zaehler++;
if ($zaehler==5)
{
$ende="0";
}
out "<a href=\"http://baseportal.de/cgi-bin/baseportal.pl?htx=/meinPfad/seiten&sessionid=";
out $tmpsessionid,"&user=";
out $benutzername;
out "\" target=\"user\">";
out $benutzername;
out "<a><br>";
}
$sessionid=$tmpsessionid;
</perl>