why doesnt random img work in php4

[Anon]

Hi,
I used to run my script on a php3 machine, and the random image script that reads from a folder (I'll paste the script below) works perfectly. But ever since my files are transferred to a php4 machine, it doesnt work anymore. I have tried all the image random scripts i could find, but non of them works.

What might be the problem?

file name is imgrandom.php3

<?php

#This script has been developped by Francesco D'Alesio [[e-mail]]
#Please feel free to contact me for any reason

#All you have to do is to change this two variables. Remember to use the absolute path for the first variable, starting with a slash

$absolute = "../pics/";
$url = "http://www.domain.com/pics/";

#You my now add in the img html tag the url of this script
#<IMG SRC="http://yourdomain.com/whatever/imgrandom.php3">

DO NOT CHANGE ANYTHING BELOW THIS LINE

$randir = dir("$absolute");

$num = 0;

while($read = readdir($randir))

{

$tmp = split(".", $read, 2);

if ($tmp[1] == "jpg" || $tmp[1] == "JPG")

{

$imgsrc[] = $read;

$num++;

}

if ($tmp[1] == "gif" || $tmp[1] == "GIF")

{

$imgsrc[] = $read;

$num++;

}
}

srand((double)microtime()*1000000);

$imgrandom = rand(0,($num-1));

header("location: $url/$imgsrc[$imgrandom]");

?>

[Anon]

Here\'s mine. It assumes you have a directory called random/ and that it\'s full of pictures, and a file \'index.php3\'.

<?php

$fname = array(); // array for filenames
$ctr = -2; // skip . and .. directory entries

$d = dir(\"random/\");
while($entry = $d->read()) {
if($entry != \"index.php3\") {
$ctr++;
$fname[$ctr]=$entry;
}
}

srand((double)microtime()*1000000);
$num=rand(1,$ctr);
echo \"<center><img src=random/$fname[$num]></center><br>\n\";

?>

Good luck!

[Anon]

Forget all the backslashes in the above post except for newlines. I don't know why phpbuilder.com's forum does that.