#!/usr/bin/perl
$where = $ENV{'QUERY_STRING'};
#This is the url to your out script
###################################
$url = "http://cz3.clickzs.com/cj2.php?username";
#What percentage of surfers should go to the intended gallery
##################################################
###########
$pig = "70";
srand;
$n = int rand(100);
if ($n < $pig)
{
print "Location: $where\n\n";
}
else
{
print "Location: $url\n\n";
}
I want to use this script to basically skim some of my clickz trades.... Only problem is I have more then 1 clickz code I'd like to use, anyone know how to change this to randomly pick different clickz out urls like?
http://cz3.clickzs.com/cj3.php?username
http://cz3.clickzs.com/cj8.php?username
http://cz3.clickzs.com/cj9.php?username
etc ?
any help would be great, thanks