 |
#!/usr/bin/perl
##############################################################################
# Cliff's Banner Rotator Version 3.01 #
# Copyright 1998 Shaven Ferret Productions #
# Created 7/8/98 Last Modified 09/10/01 #
# Available at http://www.shavenferret.com/scripts #
##############################################################################
# COPYRIGHT NOTICE #
# Copyright 1998 Shaven Ferret Productions All Rights Reserved. #
# #
# This script can be used free of charge so long as you don't change any #
# part of it. By using this script you agree to indemnify me from any #
# liability that might arise from its use. In simple English, if this #
# script somehow makes your computer run amuck and kill the pope, it's not #
# my fault. #
# #
# Redistributing\selling the code for this program without prior written #
# consent is expressly forbidden. #
##############################################################################
require "ad-lib.cgi";
&setup;
open(FILE,"$datadir/main.txt");
@banners = ;
close(FILE);
print "Content-type: text/html\n\n";
srand;
$i = int(rand(250));
if ($i != 64) {
for ($i = $#banners; $i >= 0; $i--) {
($filenum,$weight,$inactive,$hideit,$hidetext,$hideact) = split(/\|/, $banners[$i]);
if ($inactive == 0 && ($hideit == 0 || ($hideit && ($ENV{'DOCUMENT_URI'} =~ /$hidetext/ && $hideact == -1) || ($ENV{'DOCUMENT_URI'} !~ /$hidetext/ && $hideact == 0)))) {
for ($j = 1; $j <= $weight; $j++) { splice(@okbanners,0,0,"$filenum|$i"); }
}
}
$bannernum = int(rand($#okbanners+1));
($filenum,$linenum) = split(/\|/,$okbanners[$bannernum]);
open(FILE,"$datadir/h$filenum.txt");
@lines = ;
close(FILE);
print "$lines[1]";
($trackctr,$java,$dimp,$imp,$dctr,$ctr,$ddate,$lmonth,$lday,$lyear,$conditions,$autoact,$email) = split(/\|/, $lines[0]);
open(FILE,"$datadir/c$filenum.txt");
$temp = ;
close(FILE);
($aimp,$actr) = split(/\|/,$temp);
$aimp++;
open(FILE,">$datadir/c$filenum.txt");
print FILE "$aimp|$actr";
close(FILE);
if ($dimp || $dctr || $ddate) { &checkdel; }
}
# Changing or deleting the following line of this script is illegal.
else { print "![](\"http://www.shavenferret.com/scripts/givelink/banner4.gif\")
Banner Rotator from Cliff's Perl Scripts
\n"; }
sub checkdel {
if ($dimp && $aimp >= $imp) { $true = -1; }
elsif ($dimp) { $false = -1; }
if ($dctr && $actr >= $ctr - 1) { $true = -1; }
elsif ($dctr) { $false = -1; }
if ($ddate) {
&getdate;
$lmonth++;
if (($year > $lyear) || ($year == $lyear && $mon > $lmonth) || ($year == $lyear && $mon == $lmonth && $mday >= $lday)) { $true = -1; }
else { $false = -1; }
}
if ($true && ($conditions == 0 || $false == 0)) { &deleteone; }
}
 |
|
|
Jill's Zine Reviews
|
Jills Rating System:
| Nescafe................ | Don't bother. Not even worth spilling your latte on.
|
| House Blend......... | Run of the mill. Slightly interesting, neither fantastic nor crappy.
|
| Moccacinno........... | Fluffy eye candy. Yummy, clever and achingly hip.
|
| Espresso.............. | Beautifully put together. Sweet, to the point, not stuffed with superfluous ads and razor
thin bimbos. Informative and relevant.
|
|
Hip Mama
Sporadically published, but always enjoyed, is this ‘zine about alternate methods of
parenting. Touted as the magazine ‘For parents that didn't check their personality at the door when they gave
birth' Hip Mama speaks to a demographic of parents that most magazines about children and parenting overlook.
Namely really cool people that have children.
Sole support parents, lesbian or gay parents, poor parents,
sexually active parents, activist parents, rock musician parents, in short, a veritable plethora of parents
that live outside the mainstream, and are pretty damn happy raising their children there. Challenging and
critical, Hip Mama offers fresh insight into the stale ground of parenting lore.
Ariel Gore, the editor of
Hip Mama has published two parenting books and has put together a terrific website. Even if you aren't a mama
or papa yourself, it's worth the read if only to examine your own views on child rearing, and to wonder yet
again, what the hell was wrong with your parents, and why weren't they as cool as some of the parents that
put together this great ‘zine.
Jill gives Hip Mama a Mocchacinno.
|
|
|
|
