Select Code to Download

print "Content-Type: text/html\n\n";
print "
...
<---Banner needs to go here--->
Hi, welcome to the site....
";

$random = rnd($numofbanners);
open IMAGE, "images/banner$random.gif";
while (<IMAGE>) { print $_; }
close IMAGE;