Random Image Loader (Rated 0)Description:
You can use this script to load up a different image each time the page is loaded. Useful for people who don't have PHP enabled webspace.
Remember to chmod 755 the cgi file when uploaded.
Call the file random.cgi Code starts here
#!/usr/local/bin/perl
$imagedir = 'http://www.domain.com/images/';
@arrimages = ("image1.gif", "image2.gif", "image3.gif");
$seedno = $#arrimages + 1;
srand(time ^ $$);
$imageid = rand($seedno);
print qq(Location: $imagedir$arrimages[$imageid]\n\n);
return;
Submitted by Devscripts on 17-02-2003 21:19 |
