Linux, Unix, /etc/$ To set up this Linux system, do I really have to type long,
cryptic, frequently inconsistent and undocumented commands with
occasional long strings of hex digits?
# Yeah. You got a problem with that?
|
Sponsored links (requires javascript):
#!/usr/bin/perl -w
#
# A perl script that generates a Hunter S. Thompson-like invective
#
# I officially stole it from Everything2.com at:
# http://www.everything2.com/index.pl?node_id=963344 (or 870052)
# (I'm kind of drunk now, so it could be either)
#
# --Tedd Terry, friend to all the animals
# minderbinder@dasbistro.com
#########
use strict;
my @LIST1;
my @PRON;
my @LIST2;
my @NOUN;
@LIST1 = ("vicious",
"rancid",
"savage",
"fiendish",
"filthy",
"rotten",
"demented",
"treacherous",
"heinous",
"scurvy",
"devious",
"grisly",
"hamwit",
"filthy",
"foetid",
"cheapjack",
"hellish",
# [perdedor]'s additions follow
"bizarre",
"nasty",
"rotten",
"twisted",
"foolish",
"feverish",
"nervous",
"feculent",
# my additions follow
"cromulent",
"crapulent",
"insipid",
"pugnacious"
);
@PRON = ("You",
"That");
@LIST2 = ("festering",
"stinking",
"crazed",
"deranged",
"soul-ripping",
"drooling",
"rabbit-punching",
"knee-crawling",
"thieving",
# perdedor's additions:
"fearing",
"loathing",
"swollen",
"demented",
"degenerate",
"mis-wired",
"idiot-savant",
"repugnant",
"goddamn",
"apocrustic"
);
@NOUN = ("bastard",
"swine",
"pig",
"pile of albino warts",
# perdedor's additions:
"mongoloid",
"lizard",
"Nazi",
"satan worshipper",
"religous freak",
"hormone monster",
"goat's ass",
# my additions:
"emo kid",
"mouth breeder",
"trilobyte",
"hippie",
"raver",
"twat",
"monkeyfucker",
"jewcunt"
);
print "$PRON[rand @PRON] $LIST1[rand @LIST1] $LIST2[rand @LIST2] $NOUN[rand @NOUN]!\n";