Este código hace que aparezcan, mediante SSI, un par de banners con distintas ID. Cada vez que la página carga, muestra diferentes banners al azar (de entre 10). El problema es que a veces muestra un banner, a veces dos, y a veces ninguno. ¿Alguien sabe cómo hacer que siempre aparezcan 2?
Código:
require "admin/data/settings.pl" or &dienice(19);
open (MEMDATSSI,"$data_path/members.db") or &dienice(15);
if ($use_flock) { flock(MEMDATSSI, 1) or &dienice(100); }
@datassi = <MEMDATSSI>;
close (MEMDATSSI);
$numban = (int(rand($ssi_ban_num))) + 1;
if ($numban == $ssi_ban_num) {$numban2 = 1}
else {$numban2 = $numban + 1}
foreach $line(@datassi) {
@bze = split(/\|/,$line);
if ($bze[1]) {
if ($bze[1] == $numban) {
$html .= "<a href=\"$cgi_url/out.cgi?ID=$bze[1]\"
target=\"_blank\"><img src=\"$bze[5]\" width=$banner_width
height=$banner_height border=0></a>\n";
}
if ($bze[1] == $numban2) {
$html .= "<a href=\"$cgi_url/out.cgi?ID=$bze[1]\"
target=\"_blank\"><img src=\"$bze[5]\" width=$banner_width
height=$banner_height border=0></a> \n";
}
}
}
print "Content-type: text/html\n\n";
print "$html";
exit;
