Anonymous avatar Anonymous committed c4bf48e

[Fortunes] split shlomif.xml into shlomif.xml and sharp=perl.xml .

Comments (0)

Files changed (6)

lib/Shlomif/Homepage/FortuneCollections.pm

 "there is no IGLU cabal", and other Israeli Linux on-line folklore.
 EOF
     },
+    {
+        'id' => "sharp-perl",
+        desc => "a collection of conversations from Freenode's #perl"
+    },
 );
 
 sub get_fortune_records

t2/humour/fortunes/fortunes-list.mak

 	nyh-sigs \
 	osp_rules \
 	paul-graham \
+	sharp-perl \
 	shlomif \
 	shlomif-fav \
 	subversion \

t2/humour/fortunes/fortunes-shlomif-ids-data.yaml

       date: 2008-07-04T09:17:00Z
     paul-graham-wrong-people-like-java: 
       date: 2008-07-04T09:17:00Z
+  sharp-perl.xml: 
+    IRC-me-I-you-we: 
+      date: 2009-12-14T16:42:47Z
+    be-here-or-not-be-here: 
+      date: 2009-12-14T16:42:47Z
+    books-for-learning-perl: 
+      date: 2009-12-14T16:42:47Z
+    chuck-norris-and-perl-6: 
+      date: 2009-12-14T16:42:47Z
+    code-golf-pyramid: 
+      date: 2009-12-14T16:42:47Z
+    commitment-to-prog-langs: 
+      date: 2009-12-14T16:42:47Z
+    documentation-for-bl: 
+      date: 2009-12-14T16:42:47Z
+    emulating-a-newbie-on-perl: 
+      date: 2009-12-14T16:42:47Z
+    extreme-programming-as-a-religion: 
+      date: 2009-12-14T16:42:47Z
+    foolish-inviting-rindolf-to-australia: 
+      date: 2009-12-14T16:42:47Z
+    free-as-in-what: 
+      date: 2009-12-14T16:42:47Z
+    how-many-clicks: 
+      date: 2009-12-14T16:42:47Z
+    how-much-perl-do-you-need: 
+      date: 2009-12-14T16:42:47Z
+    leonerd-life-readiness: 
+      date: 2009-12-14T16:42:47Z
+    many-types-of-wheels: 
+      date: 2009-12-14T16:42:47Z
+    misleading-textbooks-about-perl: 
+      date: 2009-12-14T16:42:47Z
+    my-os-is-better-than-yours: 
+      date: 2009-12-14T16:42:47Z
+    n-uple-negative: 
+      date: 2009-12-14T16:42:47Z
+    newline-prices: 
+      date: 2009-12-14T16:42:47Z
+    perl-dongs-and-everything-in-between: 
+      date: 2009-12-14T16:42:47Z
+    prog-lang-multi-lingual: 
+      date: 2009-12-14T16:42:47Z
+    scary-perl-expertise: 
+      date: 2009-12-14T16:42:47Z
+    sextalk-according-to-perlers: 
+      date: 2009-12-14T16:42:47Z
+    sharp-offtopic-not-a-bug: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-apeiron-phone: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-are-you-being-verbed: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-assign-named-foo-and-bar: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-best-kind-of-bugs: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-bit-by-bit: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-black-beer: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-can-i-haz-fast-compiler: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-coll-yourself-a-programmer: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-conditional-inheritance-refactoring: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-costly-perl-documentation: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-dishsort: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-eye-pea: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-for-elisabeth: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-geek-love: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-good-scalar-localtime: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-got-the-slashdot: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-grand-uni-prog-lang: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-hacking-into-a-hacker: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-how-intrusive: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-how-to-name-a-flickr-module: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-human-xml: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-lame-even: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-log-analyser-in-haskell: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-love-life-of-cats: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-meaning-of-I: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-module-build-saga: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-monkey-business: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-more-that-one-way-for-a-cat-to-paw: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-one-rindolf-each: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-production-wtf-code: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-retardedness: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-sharp-pearl: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-the-func: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-the-irc-based-unix-shell: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-the-voices-tell-me-so: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-think-too-much: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-to-wikipedia: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-tribute-to-the-prisoner: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-using-encyclopedias: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-versions-of-software: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-whatever: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-whats-in-a-var-name: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perl-who-youre-gonna-call: 
+      date: 2009-12-14T16:42:47Z
+    sharp-perlcafe-watched-the-fountain: 
+      date: 2009-12-14T16:42:47Z
+    sharp-sharp-perl-chuck-norris-as-a-refactorer: 
+      date: 2009-12-14T16:42:47Z
+    the-anti-school-anti: 
+      date: 2009-12-14T16:42:47Z
+    the-messiah-of-perl: 
+      date: 2009-12-14T16:42:47Z
+    the-name-bunny: 
+      date: 2009-12-14T16:42:47Z
+    the-only-prog-lang: 
+      date: 2009-12-14T16:42:47Z
+    third-sharp-perl-reich: 
+      date: 2009-12-14T16:42:47Z
+    verbing-the-verb: 
+      date: 2009-12-14T16:42:47Z
+    vintage-hypertext: 
+      date: 2009-12-14T16:42:47Z
+    which-prefix-do-you-want: 
+      date: 2009-12-14T16:42:47Z
   shlomif-fav.xml: 
     R-is-similar: 
       date: 2009-02-11T18:12:07Z

t2/humour/fortunes/sharp-perl.html.wml

+#include '../template.wml'
+#include "xhtml/1.x/std/toc.wml"
+
+<latemp_subject "Freenode #perl Conversations - (Fortunes Cookies) Shlomi Fish's Collection" />
+
+<h2*>The Freenode #perl Fortunes collection</h2*>
+
+<h3*>Table of Contents</h3*>
+
+<toc />
+
+<h2 id="fortunes-list">The Fortunes Themselves</h2>
+<div class="fortunes_list">
+#include "fortunes/xhtmls/sharp-perl.xhtml-for-input"
+</div>
+

t2/humour/fortunes/sharp-perl.xml

+<?xml version="1.0" encoding="utf-8"?>
+<?xml-stylesheet type="text/xml" href="fortune-xml-to-html.xsl"?>
+<collection>
+  <head/>
+  <list>
+    <fortune id="documentation-for-bl">
+      <meta>
+        <title>Documentation for BL</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">buu: do you have a working manual of BL?</saying>
+          <saying who="rindolf">s/working/up-to-date/</saying>
+          <saying who="buu">It's kind of sort of up to date</saying>
+          <saying who="perlygatekeeper">he means NO</saying>
+          <saying who="buu">I've got some docs!</saying>
+          <saying who="rindolf">buu: do you have a functional spec? An architecture document? An interface whitepaper? A developer's guide?  A user manual? A "The BL-Book" and "BL - The Program"?</saying>
+          <saying who="buu">rindolf: no, no, no no and no</saying>
+      </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Discussing the merits of documenting one's pet languages on</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="newline-prices">
+      <meta>
+        <title>Did anybody see my newline at Freenode's #perl channel.</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">sleeper: why are people obsessed with one-liners?</saying>
+          <saying who="rindolf">It takes 3 lines - OMG what a disaster!</saying>
+          <saying who="Botje">rindolf: newline prices went up again</saying>
+          <saying who="rindolf">Botje: I buy my newlines in the black market</saying>
+          <saying who="dabreegster">Botje: again? drat.</saying>
+          <me_is who="Botje">reports rindolf to the newline police</me_is>
+          <saying who="dabreegster">Botje: I know about an... (underground) operation going on to pirate newlines.</saying>
+          <saying who="rindolf">Botje: I bribed a few cops in the newline police, but nice try.</saying>
+          <saying who="dabreegster">Botje: Some crazy guys are trying to free newlines from  patents! They want to rid the market!</saying>
+          <me_is who="cursor">gets called up to serve in the newline jury</me_is>
+          <saying who="rindolf">I think we need to start a campaign to lift all restrictions  off newlines.</saying>
+          <saying who="dabreegster">rindolf: La Resistance lives on!\n</saying>
+          <saying who="Botje">I already stockpiled millions of newlines</saying>
+          <saying who="dabreegster">Botje: We can have the one-liners destroyed by sundown</saying>
+          <saying who="dabreegster">Not destroyed, but... TURNED INTO TWO-LINERS! Mwuhahaha!</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>The Cost of Newlines</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="verbing-the-verb">
+      <meta>
+        <title>Verbing the verb on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <me_is who="buu">Stevie[FP] with a plunger.</me_is>
+          <me_is who="Stevie[FP]">looks for the verb in that sentence</me_is>
+          <saying who="sili">i think you're missing a verb</saying>
+          <saying who="Stevie[FP]">I think he's missing a brain.</saying>
+          <saying who="sili">unless Stevie[FP] is a verb i don't know</saying>
+          <saying who="sili">Stevie[FP]: v. see Stevie[FP]</saying>
+          <saying who="Stevie[FP]">I am not a verb!</saying>
+          <saying who="sili">you've been verbatized</saying>
+          <me_is who="rindolf">Stevie[FP]'s Chris62vw</me_is>
+          <saying who="Stevie[FP]">verbalized?</saying>
+          <saying who="rindolf">Stevie[FP]: verbalized is a different thing.</saying>
+          <saying who="rindolf">Stevie[FP]: it comes from "verbal".</saying>
+          <saying who="Stevie[FP]">Verbified.</saying>
+          <saying who="Stevie[FP]">Verbiated.</saying>
+          <saying who="rindolf">stefan: verbificated.</saying>
+          <saying who="Botje">verbed.</saying>
+          <saying who="Stevie[FP]">Verberated.</saying>
+          <saying who="rindolf">Stevie[FP]: verberation is overrated.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Verbing the Verb</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-human-xml">
+      <meta>
+        <title>Human XML</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="BarnacleBob">i hate xml.....</saying>
+          <saying who="mcrawfor">&lt;response to="BarnacleBob"&gt;indeed&lt;/response&gt;</saying>
+          <saying who="rindolf">mcrawfor: :-)</saying>
+          <saying who="rindolf">mcrawfor++ # Nice joke</saying>
+          <saying who="Botje">ehm. ouch.</saying>
+          <saying who="Botje">rindolf: no!</saying>
+          <saying who="Botje">&lt;postincrement comment="Nice joke"&gt;mcrawfor&lt;/postincrement&gt;</saying>
+          <saying who="rindolf">Botje: LOL.</saying>
+          <saying who="rindolf">&lt;postincrement comment="As you wish"&gt;Botje&lt;/postincrement&gt;</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Human XML</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="IRC-me-I-you-we">
+      <meta>
+        <title>/me (or I, you or we) is finding it amusing on Freenode's #perl.</title>
+      </meta>
+      <irc>
+        <body>
+          <me_is who="__you">fart</me_is>
+          <me_is who="__you">say "oops"</me_is>
+          <saying who="rindolf">__you: heh</saying>
+          <me_is who="__you">kick rindolf</me_is>
+          <saying who="__you">(rindolf, you're now being kicked by 435 people)</saying>
+          <saying who="squeeks">__you need to go outside.</saying>
+          <saying who="kspath">__you: Who owns you?</saying>
+          <me_is who="__you">go outside</me_is>
+          <me_is who="__you">are pwned by dazjorz</me_is>
+          <me_is who="__you">is now known as we</me_is>
+          <me_is who="we">are having a useless off-topic conversation right now</me_is>
+          <saying who="rindolf">we: hahah</saying>
+          <me_is who="we">we is now known as __you</me_is>
+          <me_is who="__you">decide this channel is now useless and decide to leave</me_is>
+          <me_is who="simcop2387">is now known as we</me_is>
+          <me_is who="we">are not amused</me_is>
+          <me_is who="__you">and I are together simcop2387</me_is>
+          <me_is who="squeeks">is now known as _I_</me_is>
+          <me_is who="_I_">need to tell __you something</me_is>
+          <me_is who="__you">listen</me_is>
+          <me_is who="simcop2387">is now known as we</me_is>
+          <me_is who="we">need help</me_is>
+          <me_is who="_I_">think we are getting a bit sick of the shenanigans</me_is>
+          <saying who="rindolf">I'm so making a fortune out of it.</saying>
+          <me_is who="we">want to be on bash.org</me_is>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>/me (or I, you or we) is finding it amusing</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="prog-lang-multi-lingual">
+      <meta>
+        <title>Multi-linguality</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="spyro_boy">Oh! I fixed it :D</saying>
+          <saying who="spyro_boy">Yay :D</saying>
+          <saying who="rindolf">spyro_boy: congrats!</saying>
+          <saying who="spyro_boy">Thanks for your help, everyone. :)</saying>
+          <saying who="rindolf">spyro_boy: now you should translate this script to O'Caml, Haskell, Perl 6.</saying>
+          <saying who="spyro_boy">rindolf, huh?</saying>
+          <saying who="rindolf">spyro_boy: Smalltalk, C, C++, Visual Basic...</saying>
+          <saying who="spyro_boy">rindolf, translate to what?</saying>
+          <saying who="rindolf">spyro_boy: to all these programming languages.</saying>
+          <saying who="spyro_boy">haha</saying>
+          <saying who="spyro_boy">rindolf, yeah.</saying>
+          <saying who="rindolf">Because a script in perl is Not Enough&lt;tm&gt;.</saying>
+          <saying who="rindolf">spyro_boy: but see the Great Computer Language Shootout.</saying>
+          <saying who="spyro_boy">rindolf, I tried learning C,C++, and Java, but I couldn't catch on.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Mulit-linguality</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="chuck-norris-and-perl-6">
+      <meta>
+        <title>Chuck Norris and Perl 6</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">wankit</saying>
+          <saying who="buubot">Perl 6, unlike most people, is able to breathe in the vacuum of space. In fact, anything else would damage its respiratory system. Because of this, whenever it's visiting Earth, it wears a respirator, which resembles a kickass beard.</saying>
+          <saying who="rindolf">Heh heh.</saying>
+          <saying who="rindolf">Are all of buubot's wankit factoids about Perl 6?</saying>
+          <saying who="rindolf">He should have some about Chuck Norris, too.</saying>
+          <saying who="merlyn">fictional factoids about a partially designed, partially implemented, partially wanted language. :)</saying>
+          <saying who="rindolf">merlyn: yeah.</saying>
+          <saying who="merlyn">Heh - those are all Chuck Norris quotes with s/Chuck/P6/</saying>
+          <saying who="dabreegster">rindolf: It's written in Chuck Norris, right</saying>
+          <saying who="merlyn">Chuck Norris writes code in Perl 6. Before Larry's done. And it works.</saying>
+          <saying who="rindolf">merlyn: Chuck Norris wrote Perl 6 in a day but then destroyed all evidence with his bare hands, so no one will know his secrets.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Discussing the merits of documenting one's pet languages on</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="leonerd-life-readiness">
+      <meta>
+        <title>Is a Life Ready for Prime Time?</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">LeoNerd: I need to get a life.</saying>
+          <saying who="LeoNerd">They can be quite useful, but they do have a crazy amount of dependencies..</saying>
+          <saying who="LeoNerd">And sometimes they can be a bit unstable - I think they're still beta-testing</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Is a Life Ready for Prime Time</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-for-elisabeth">
+      <meta>
+        <title>#perl for Elisabeth</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="simcop2387">Daveman: i use a ZED PEE EM to power my computer, its the ultimate YOU PEE ES</saying>
+          <me_is who="Daveman">throws an Elisabeth at Simcop</me_is>
+          <saying who="rindolf">Me catches the Elisabeth in mid-air.</saying>
+          <saying who="SubStack">with an s, excellent choice</saying>
+          <saying who="Daveman">:o</saying>
+          <saying who="Daveman">Interception!</saying>
+          <saying who="rindolf">Daveman: when my friend and I played Frisbee, we had an intra-tree move.</saying>
+          <me_is who="SubStack">pirates Elisabeth and seeds a torrent</me_is>
+          <saying who="rindolf">Which was unintended.</saying>
+          <saying who="rindolf">Elisabeth: are you here?</saying>
+          <saying who="Daveman">HAHAHAHHA</saying>
+          <saying who="Daveman">Substack++</saying>
+          <me_is who="SubStack">wins at life.</me_is>
+          <saying who="rindolf">An Elisabeth for all! And all for an Elisabeth.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>#perl for Elisabeth</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="books-for-learning-perl">
+      <meta>
+        <title>Books for Learning Perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="Alexi5">what is a good book for getting up to speed with  perl?</saying>
+          <saying who="merlyn">learning perl!</saying>
+          <saying who="merlyn">intermediate perl!</saying>
+          <saying who="nachos_">the camel is the _only book_</saying>
+          <saying who="nachos_">:-P</saying>
+          <me_is who="merlyn">bats nachos silly</me_is>
+          <saying who="nachos_">:-(</saying>
+          <saying who="rindolf">Alexi5: there's also Beginning Perl, which is available  online.</saying>
+          <me_is who="f00li5h">saw that coming</me_is>
+          <saying who="rindolf">You should learn Perl from "Learning Perl in 24 minutes  Unleashed!"</saying>
+          <saying who="f00li5h">rindolf: ``Learning perl in 24 minutes Unleashed, in a  nutshell for dummies'' is the one i have</saying>
+          <saying who="rindolf">f00li5h: that's even better.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Books for Learning Perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="vintage-hypertext">
+      <meta>
+        <title>Discussing Vintage Hypertext on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">Are you using Firefox?</saying>
+          <saying who="Imaginativeone">yeah...</saying>
+          <saying who="rindolf">Interesting...</saying>
+          <saying who="rindolf">Don't know.</saying>
+          <saying who="[x86]">use a real browser... you know... like IE!</saying>
+          <me_is who="[x86]">runs</me_is>
+          <saying who="infi">IE 3 &gt; *</saying>
+          <saying who="rindolf">IE 2 &gt; *</saying>
+          <saying who="infi">gopher!</saying>
+          <saying who="infi">firefox can actually do gopher URLs</saying>
+          <saying who="rindolf">GNU info!</saying>
+          <saying who="infi">feh.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Vintage Hypertext</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="free-as-in-what">
+      <meta>
+        <title>Free as in what?</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">ofer0: what's up?</saying>
+          <saying who="ofer0">rindolf, nothing much. what's with you?</saying>
+          <saying who="rindolf">ofer0: I restored my fonts to my nouveau-enabled X server.</saying>
+          <saying who="jagerman">What is nouveau?</saying>
+          <saying who="ofer0">jagerman, "new" in french ?</saying>
+          <saying who="jagerman">Yes, I know it's a word, but what is the nouveau rindolf is talking about?</saying>
+          <saying who="ofer0">I have no idea. rindolf ?</saying>
+          <saying who="rindolf">jagerman, ofer0: it's the free-as-in-speech Nvidia drivers.</saying>
+          <saying who="dmq">jagerman++ (Yes i know its a word).</saying>
+          <saying who="pkrumins">free as in freedom</saying>
+          <saying who="nainef">free as in richard stallman?</saying>
+          <saying who="ofer0">free as in free Microsoft Windows Vista CDs</saying>
+          <saying who="nainef">lol</saying>
+          <saying who="pkrumins">vista--</saying>
+          <saying who="ofer0">"What do you mean? Windows XP isn't free?" -- My neighbour.</saying>
+          <saying who="Ikarus">ofer0: sounds familiar</saying>
+          <saying who="ofer0">(when telling him that I can't format his hard-drive and re-install XP because he doesn't own a license)</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Free as in what?</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="the-only-prog-lang">
+      <meta>
+        <title>The Only Programming Language</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">This reminds me of a fun discussion I had with my co-worker.</saying>
+          <saying who="rindolf">He had a Firefox window open with an ActiveState page and I read "Perl, PHP, Python, Tcl, XSLT".</saying>
+          <saying who="rindolf">So he said: "Heresy! C is the only language."</saying>
+          <saying who="rindolf">So I thought for a moment and said "Intercal is the only language."</saying>
+          <saying who="nanonyme">lol</saying>
+          <saying who="rindolf">And then "Real men write in Intercal."</saying>
+          <saying who="rindolf">"COME FROM" anyone?</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>The Only Programming Language</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="misleading-textbooks-about-perl">
+      <meta>
+        <title>Misleading Textbooks about Perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">mortal5: you need to print the header.</saying>
+          <saying who="rindolf">mortal5: print header()</saying>
+          <saying who="mortal5">rindolf, ...I absolutely love it when my textbook leads me wrong..</saying>
+          <saying who="rindolf">mortal5: what is your textbook?</saying>
+          <saying who="mortal5">"web wizards guide to perl and cgi"</saying>
+          <saying who="mortal5">lol</saying>
+          <saying who="mortal5">only the finest for the students at my university</saying>
+          <saying who="buu">Hahaha</saying>
+          <saying who="buu">That's awesome.</saying>
+          <saying who="cfedde">Is this what we're teacing these days? Oh my.</saying>
+          <saying who="somian">Blows the mind, doesn't it cfedde!</saying>
+          <saying who="cfedde">somian: it does.</saying>
+          <saying who="cfedde">I suppose that I'm commenting out of context. but why the mix and match.</saying>
+          <saying who="f3ew">What mind?</saying>
+          <saying who="cfedde">yours, with this .48</saying>
+          <me_is who="somian">sends in CSI las vegas to clean up</me_is>
+          <saying who="rindolf">mortal5: what is your university?</saying>
+          <saying who="mortal5">rindolf, I'm too ashamed to tell :p</saying>
+          <saying who="rindolf">mortal5: heh.</saying>
+          <saying who="rindolf">mortal5: is it bad?</saying>
+          <saying who="mortal5">rindolf, no not really, we have a fairly well known cs dept</saying>
+          <saying who="somian">Just so long as it isn't SUNY@BUFFALO</saying>
+          <saying who="mortal5">it's just the teacher i'm using, she's a total flake</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Misleading Textbooks about Perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="perl-dongs-and-everything-in-between">
+      <meta>
+        <title>Perl, dongs and everything between on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <me_is who="CPAN">rating: Net-DNS-Check rated 4 stars by Ævar Arnfjörð Bjarmason</me_is>
+          <saying who="rindolf">Oooh! avar has rated a module.</saying>
+          <saying who="somian^{}">avar! WHAT ARE YOU DOING rating CPAN modules!?! Do you really think you are QUALIFIED to be doing that!?! ;-P</saying>
+          <me_is who="avar">dongs somian^{}</me_is>
+          <me_is who="somian^{}">laughs</me_is>
+          <saying who="avar">somian^{}: I'M A PROFESSIONAL PERL PROGRAMMER</saying>
+          <saying who="avar">I know PERL</saying>
+          <saying who="somian^{}">But can u mAke teh weB with teh PERL!?</saying>
+          <saying who="Earle_Martin">avar: I know DONGS</saying>
+          <saying who="avar">Earle_Martin: SHOW ME</saying>
+          <saying who="avar">Earle_Martin: Don't you mean DONG foo?</saying>
+          <me_is who="somian^{}">has a silly grin on his face as he decends the stairs to make some fresh coffee</me_is>
+          <saying who="avar">somian^{}: I maek teh web really well with PERL</saying>
+          <saying who="Earle_Martin">/DCC MATRIX avar</saying>
+          <saying who="avar">Earle_Martin: IT'S SO LARGE AND HARD!</saying>
+          <saying who="Earle_Martin">avar: You think that's milk you're drinking?</saying>
+          <saying who="f3ew">heh]</saying>
+          <saying who="avar">I was wondering why it was so delcicious</saying>
+          <saying who="avar">"I can't belive it's not jizz"</saying>
+          <saying who="f3ew">Take the red pill</saying>
+          <saying who="rfordinal_">blue!</saying>
+          <saying who="Earle_Martin">I know PERL: Programmer's Elite Robotic Language</saying>
+          <me_is who="avar">goes back to work</me_is>
+          <saying who="Shadow42">I wonder what would happen if Neo was colorblind and took the wrong pill.</saying>
+          <saying who="Earle_Martin">10 DO ROBOT DANCE</saying>
+          <saying who="Earle_Martin">20 GOTO 10</saying>
+          <saying who="avar">which doesn't involving discussing dongs in great detail, unfortunately</saying>
+          <saying who="Earle_Martin">avar: the real world sucks</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Perl and Dongs on Freenode's #perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="n-uple-negative">
+      <meta>
+        <title>N-uple negative on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="polak">mauke: so how does that "translate" into eng</saying>
+          <saying who="merlyn">"eng"?</saying>
+          <saying who="mauke">I spe eng goo</saying>
+          <saying who="rindolf">mauke: I spe eng wel</saying>
+          <saying who="rindolf">I spe goo eng</saying>
+          <saying who="sts">just a short question. besides personal preference is there any difference if you use if(! or unless(?</saying>
+          <saying who="rindolf">sts: no.</saying>
+          <saying who="rindolf">sts: they do the same thing.</saying>
+          <saying who="Botje">sts: pfft. Real Men(tm) use unless(!...)</saying>
+          <saying who="rindolf">Botje: heh.</saying>
+          <saying who="sts">lol unless(! makes sense. thanks Botje, i'll rather use this one. =D</saying>
+          <saying who="LeoNerd">For me it's a readability thing - I express what seems more likely</saying>
+          <saying who="rindolf">Botje: File::HomeDir used to have a triple or quadruple negative in one of its test files.</saying>
+          <saying who="Botje">unless(! $str !~ /(?!foo)/)</saying>
+          <saying who="rindolf">Botje: heh</saying>
+          <saying who="merlyn">whoa</saying>
+          <saying who="merlyn">unless (!) makes no sense to me at all</saying>
+          <saying who="Botje">of course not.</saying>
+          <saying who="sts">Botje: wow!</saying>
+          <saying who="Botje">it's still cool to confuse people with :]</saying>
+          <saying who="LeoNerd">Heh.. Should just use !!! in there anywa y:)</saying>
+          <saying who="merlyn">it's 7 characters too many</saying>
+          <saying who="xand">some people don't understand double negatives</saying>
+          <saying who="merlyn">I don't want no complaints!</saying>
+          <saying who="Botje">xand: you mean don't not understnad?</saying>
+          <saying who="LeoNerd">We don't know nobody who don't want no double-negatives</saying>
+          <saying who="sts">Botje: what does (?!foo) do?</saying>
+          <saying who="nanonyme">lol</saying>
+          <saying who="xand">Botje: don't not misunderstand</saying>
+          <saying who="mauke">Botje: that always executes the block</saying>
+          <saying who="merlyn">there's an argument that can be successfully made that "I don't want no complaints" doesn't necessarily work logically</saying>
+          <saying who="Botje">xand: oh, I don't not think I didn't not misunderstand you.</saying>
+          <saying who="Botje">mauke: I know. it just looks cool.</saying>
+          <saying who="mauke">and you want !($str !~ /.../)</saying>
+          <saying who="xand">don't you?#</saying>
+          <saying who="merlyn">so it might actually mean what people think they're meaning</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>N-uple negative on Freenode's #perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="my-os-is-better-than-yours">
+      <meta>
+        <title>My operating system is better than yours on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="Yaakov">LINUX &lt; WINDOWS XP</saying>
+          <saying who="rindolf">Yaakov: Linux "&gt;" x Inf Windows XP</saying>
+          <saying who="rindolf">Yaakov: DOS &gt; Linux</saying>
+          <saying who="rindolf">Yaakov: CTSS &gt; Linux</saying>
+          <saying who="rindolf">Yaakov: TOPS-10 &gt; Linux</saying>
+          <saying who="rindolf">Multics &gt; Linux</saying>
+          <saying who="rindolf">Multics &gt; *</saying>
+          <saying who="rindolf">I think I'll stop.</saying>
+          <saying who="Supaplex">I think I'll /clear</saying>
+          <saying who="Kobaz">CP/M &gt; *</saying>
+          <saying who="rindolf">Kobaz: heh!</saying>
+          <saying who="rindolf">Kobaz++</saying>
+          <saying who="Kobaz">Heh.</saying>
+          <saying who="Kobaz">CP/M was teh sexy.</saying>
+          <saying who="Kobaz">How much more of an OS do you really need?</saying>
+          <saying who="Kobaz">I still have my Apple II sitting in the corner.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>My Operating System is Better than Yours</tagline>
+        </info>
+
+      </irc>
+    </fortune>
+    <fortune id="many-types-of-wheels">
+      <meta>
+        <title>Freenode's #perl on the many types of Wheels.</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">Mahmoud: what's up?</saying>
+          <saying who="Mahmoud">rindolf, writing a CMS from scratch with perl.. really cool, making my own template engine</saying>
+          <saying who="rindolf">Mahmoud: why???</saying>
+          <saying who="rindolf">Mahmoud: use TT2.</saying>
+          <saying who="rindolf">Or whatever.</saying>
+          <saying who="Mahmoud">rindolf, i dislike other CMS engines.. they are bloated and i don't trust them</saying>
+          <saying who="rindolf">Mahmoud: TT2 is pure perl.</saying>
+          <me_is who="Mahmoud">looks for TT2</me_is>
+          <saying who="rindolf">Mahmoud: a CMS doesn't stay simple forever.</saying>
+          <saying who="rindolf">Mahmoud: and a CMS != Templating system.</saying>
+          <saying who="Mahmoud">rindolf, the template engine is quite simple, it's similar to how SimpleMachines forum does its templates</saying>
+          <saying who="Mahmoud">rindolf, just an external file with print 'foo'; commands</saying>
+          <saying who="amnesiac">Mahmoud, TT2 is very powerful</saying>
+          <saying who="amnesiac">Mahmoud, there are more templating systems, why not use any ofo the existing ones?</saying>
+          <saying who="rindolf">Mahmoud: please don't re-invent square wheels.</saying>
+          <saying who="Mahmoud">heh..</saying>
+          <saying who="NOTevil">oval!</saying>
+          <me_is who="amnesiac">likes hexagonal wheels</me_is>
+          <saying who="NOTevil">very small octagon wheels aren't too bad.</saying>
+          <saying who="rindolf">amnesiac: triangular wheels are the best!</saying>
+          <saying who="Shaine">i like star shaped wheels :/</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>On the Many Types of Wheels</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="code-golf-pyramid">
+      <meta>
+        <title>The Pyramid of Code Golf on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="ferret">LeoNerd: That was one of the first blobs of Java I wrote, it's allowed to be even more verbose and convoluted than Java normally is. ;P</saying>
+          <saying who="rindolf">ferret: link?</saying>
+          <saying who="ferret">/las Cat.java</saying>
+          <saying who="rindolf">ferret: an implementation of the UNIX "cat" program in Java??</saying>
+          <saying who="ferret">Actually, specifically the GNU cat program, and only a subset thereof.</saying>
+          <saying who="rindolf">ferret: oh.</saying>
+          <saying who="rindolf">ferret: how many lines did it take?</saying>
+          <me_is who="f00li5h">heads off to #codegolf and tries to convince them to allow java submissions</me_is>
+          <saying who="ferret">rindolf: It's mostly argument parser.</saying>
+          <saying who="rindolf">ferret: I once implemented a parser for a subset of the Bourne Shell args, in really hideous ANSI C.</saying>
+          <saying who="rindolf">f00li5h: good luck.</saying>
+          <saying who="rindolf">f00li5h: Java Golf...</saying>
+          <saying who="f00li5h">yeah, for sure!</saying>
+          <saying who="rindolf">Java Golf would be longer than a non-Golfed Perl program.</saying>
+          <saying who="f00li5h">rindolf: this is true</saying>
+          <saying who="rindolf">f00li5h: COBOL Golf!</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>The Pyramid of Code Golf</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="scary-perl-expertise">
+      <meta>
+        <title>Scary Perl Expertise on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="pasteling">"struggling intern" at 129.162.1.31 pasted "Here it is.." (220 lines, 5.7K) at http://sial.org/pbot/25279</saying>
+          <saying who="strugglingintern">woohoo</saying>
+          <saying who="strugglingintern">there it goes...</saying>
+          <saying who="rindolf">strugglingintern: oh my god!</saying>
+          <saying who="rindolf">strugglingintern: this code looks really bad.</saying>
+          <saying who="strugglingintern">heh...</saying>
+          <saying who="rindolf">strugglingintern: if ($records eq 0 ) - don't you want ($records == 0)?</saying>
+          <saying who="rindolf">strugglingintern: do you have unit tests?</saying>
+          <saying who="rindolf">strugglingintern: and you should factor it better.</saying>
+          <saying who="rindolf">strugglingintern: and possibly use Template Toolkit or something.</saying>
+          <saying who="rindolf">strugglingintern: and you may have some HTML-injection (or XSS) problems.</saying>
+          <saying who="Ani-_">rindolf: and probably SQL injection problems.</saying>
+          <saying who="rindolf">Ani-_: indeed!</saying>
+          <saying who="strugglingintern">:-/</saying>
+          <saying who="Ani-_">strugglingintern: really, ask them to review that code when they get back.</saying>
+          <saying who="strugglingintern">alright</saying>
+          <saying who="strugglingintern">I appreciate it anyway</saying>
+          <saying who="rindolf">strugglingintern: how long have you been programming perl?</saying>
+          <saying who="strugglingintern">hah, about 3 months</saying>
+          <saying who="strugglingintern">This isn't all my code ;)</saying>
+          <saying who="strugglingintern">I'll look into it</saying>
+          <saying who="strugglingintern">Thanks guys (and gals).</saying>
+          <saying who="rindolf">strugglingintern: you're welcome.</saying>
+          <saying who="strugglingintern">not my choice ;)</saying>
+          <saying who="strugglingintern">it's my 3rd week here :)</saying>
+          <saying who="rindolf">Amazing how much more experienced programmers can tell a code is bad from a quick glance.</saying>
+          <saying who="rindolf">It's a bit scary.</saying>
+          <saying who="Ani-_">nothing amazing about it. It's called skill. :)</saying>
+          <saying who="The_SB">yeh even I can tell it by a look</saying>
+          <saying who="ology">It's not scary or amazing at all.</saying>
+          <saying who="ology">It is called experience!</saying>
+          <saying who="Ani-_">rindolf: what do you find scary?</saying>
+          <saying who="Ani-_">rindolf: that experienced programmers can tell it? Or the code itself?</saying>
+          <saying who="Ani-_">I would disagree on the first one but agree on the later! :)</saying>
+          <saying who="rindolf">Ani-_: no, that I'm so experienced.</saying>
+          <saying who="rindolf">Ani-_: I hope I don't sound out as a snob.</saying>
+          <saying who="ology">narcissism is fun</saying>
+          <saying who="rindolf">I should get a life.</saying>
+          <saying who="rindolf">Get a girlfriend, go to movies.</saying>
+          <saying who="rindolf">Instead all I do is write Perl.</saying>
+          <saying who="rindolf">And chat about writing Perl.</saying>
+          <saying who="Ikarus">a life, tried that, didn't mix with me</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Scary Perl Expertise</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-to-wikipedia">
+      <meta>
+        <title>(Human) Language Fun on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">Let me wikipedia it.</saying>
+          <saying who="f00li5h">so now wikipedia is a verb?</saying>
+          <saying who="rindolf">f00li5h: it's gonna enter the OED.</saying>
+          <saying who="rindolf">f00li5h: in English every verb can be nounified and every noun can be verbed.</saying>
+          <saying who="rindolf">f00li5h: google is now a verb too.</saying>
+          <saying who="f00li5h">rindolf: q{ just one second and i'll "computer" it up for you"}</saying>
+          <saying who="rindolf">f00li5h: LOL.</saying>
+          <saying who="rindolf">f00li5h++</saying>
+          <me_is who="rindolf">f00li5hes jql</me_is>
+          <saying who="rindolf">I'm rindolfed</saying>
+          <me_is who="f00li5h">finds it odd that irssi hilighted half of that word</me_is>
+          <saying who="rindolf">f00li5h: it's much harder to do it in Hebrew.</saying>
+          <saying who="jql">computer is from the verb compute already</saying>
+          <saying who="rindolf">jql: there's computerise though.</saying>
+          <saying who="f00li5h">jql: but to computer something is different than computing it</saying>
+          <saying who="f00li5h">COMPUTIFY!</saying>
+          <saying who="rindolf">jql: I once thought that the study of Objectivity is Objectivism.</saying>
+          <saying who="f00li5h">"configurated"</saying>
+          <saying who="jql">you shouldn't noun up a verb that's been nouned already</saying>
+          <saying who="rindolf">And the study of Objectivism is Objectivistalism.</saying>
+          <saying who="Caelum">heh</saying>
+          <saying who="rindolf">And that study of that is Objectvisitalistalism.</saying>
+          <saying who="rindolf">And to infinity it's Objectivist-elementalism!</saying>
+          <saying who="f00li5h">eval: object .((ism)x100)</saying>
+          <saying who="buubot">f00li5h: objectismismismismismismismismismismismismismismismismismismismism ismismismismismismismismismismismismismismismismismismismismismism ismismismismismismismismismismismismismismismismismismismi</saying>
+          <saying who="rindolf">With apologies to the 4 people who ever spoke Latin correctly.</saying>
+          <saying who="jql">I can't help but read that as smi smi smi</saying>
+          <saying who="Caelum">me too</saying>
+          <saying who="rindolf">jql: reminds me of Peter Pan. </saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>(Human) Language Fun on Freenode's #perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="how-many-clicks">
+      <meta>
+        <title>How many clicks must a one man do, before he selects what he wants on Freenode's #perl.</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="dkr">I use nedit, the only app with a quadruple-click feature</saying>
+          <saying who="naquad">wtf is quadruple-click??? %-/</saying>
+          <saying who="dkr">double-click selects a word, triple-click selects a line, quadruple-click select the whole document. heh :)</saying>
+          <saying who="Patterner">quintuple-click selects the whole harddisk</saying>
+          <saying who="rindolf">hexuple-click selects the entire Intranet.</saying>
+          <saying who="rindolf">And septapable-click selects the entire Internet</saying>
+          <saying who="Patterner">How many for the multiverse?</saying>
+          <saying who="naquad">people, who uses what editor?</saying>
+          <saying who="arw">octaple click selects the known universe and nonaple the rest too.</saying>
+          <saying who="rindolf">arw: how long does it takes these clicks to run?</saying>
+          <saying who="rindolf">I think it's super-exponential complexity.</saying>
+          <saying who="arw">rindolf: no matter, the universe is finite :)</saying>
+          <saying who="arw">rindolf: only problem is, the information about your clicking will never reach the entire universe as it expands ;)</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>How many clicks must a one man do, before he selects what he wants?</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-meaning-of-I">
+      <meta>
+        <title>The meaning of "I" on Freenode's #perl.</title>
+      </meta>
+      <irc>
+        <body>
+          <me_is who="reflexive">huzzahs. His Perl books just arrived.</me_is>
+          <saying who="apeiron">reflexive, Which?</saying>
+          <saying who="reflexive">apeiron: IP and PBP. A couple others are still in transit.</saying>
+          <saying who="apeiron">reflexive, Nice. :)</saying>
+          <saying who="reflexive">:)</saying>
+          <saying who="rindolf">reflexive: what is IP?</saying>
+          <saying who="reflexive">Intermediate Perl.</saying>
+          <saying who="rindolf">reflexive: oh, OK.</saying>
+          <saying who="rindolf">Intellectual Perl.</saying>
+          <saying who="rindolf">Internet Perl.</saying>
+          <saying who="kojiro">Invasive Perl</saying>
+          <saying who="kspath">Idiot Perl</saying>
+          <saying who="rindolf">Interactive Perl.</saying>
+          <saying who="rindolf">I, Perl.</saying>
+          <saying who="kojiro">Implementing Pies</saying>
+          <saying who="kojiro">mmm, pie</saying>
+          <saying who="rindolf">Improbably Perl</saying>
+          <saying who="kspath">Ignoble Perl</saying>
+          <saying who="kojiro">Probably Inverted</saying>
+          <saying who="rindolf">kojiro: :-)</saying>
+          <saying who="kspath">Improper Perl</saying>
+          <saying who="reflexive">Insidious Perl?</saying>
+          <saying who="mst">ALL PERL IS IMPROPER</saying>
+          <saying who="kojiro">API?</saying>
+          <saying who="rindolf">In Soviet Russia all improper is Perl.</saying>
+          <saying who="rindolf">APII.</saying>
+          <saying who="qrck">impudent perl</saying>
+          <saying who="kojiro">no, you never count words like "is"</saying>
+          <saying who="kspath">Incoherent Perl</saying>
+          <saying who="kojiro">ALL PERL IS INCOHERENT</saying>
+          <saying who="reflexive">So true.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>The Meaning of "I".</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-got-the-slashdot">
+      <meta>
+        <title>Got the Slashdot? on Freenode's #perl.</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="dkr">which is that ACME:: filter that obfusctaes all your source into whitespace? :)</saying>
+          <saying who="preaction">Acme::Bleach</saying>
+          <saying who="rindolf">dkr: as preaction said it is Acme::Bleach.</saying>
+          <saying who="dkr">moderation -1 Redundant</saying>
+          <me_is who="dkr">smirks</me_is>
+          <saying who="nws">get out you slashdotter</saying>
+          <saying who="nws">jk</saying>
+          <saying who="dkr">I got moderated overrated yesterday. I felt so loved</saying>
+          <saying who="dkr">GumbyGumby: how often do you post to /.?</saying>
+          <saying who="GumbyGumby">dkr: do it to system() a ssh command. Is doing that often.</saying>
+          <saying who="rindolf">GumbyBRAIN: how often do you post dkr to Slashdot?</saying>
+          <saying who="GumbyBRAIN">do it to list.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Got the Slashdot?</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-whats-in-a-var-name">
+      <meta>
+        <title>What's in a variable-name? on Freenode's #perl.</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="WebDragon">y'all should spell it in uppercase it being an acronym and all</saying>
+          <saying who="reaction">Yes, but we're *lazy*!</saying>
+          <me_is who="WebDragon">*so* noticed ;)</me_is>
+          <saying who="dkr">WebDragon: people that use CamelCase have no right to criticize about capitalization. :)</saying>
+          <saying who="WebDragon">dkr: I hate underscores</saying>
+          <me_is who="dkr">contemplates a source code filter that does lets you use spaces in var names by switch them to underscores at compile time</me_is>
+          <saying who="preaction">black magic</saying>
+          <saying who="mst">dkr: source filters are evil.</saying>
+          <saying who="mst">dkr: in a bad way.</saying>
+          <saying who="mst">dkr: hacking the compiler is much more fun, and evil in a useful way :)</saying>
+          <saying who="mst">WebDragon: recommended perl style is $var_name</saying>
+          <saying who="mst">WebDragon: it's also more readable than $varName or $VarName</saying>
+          <saying who="mst">WebDragon: I'd recommend trying it for at least a month</saying>
+          <saying who="mst">WebDragon: also note that it'll make life easier because you'll be consistent with the rest of perl code</saying>
+          <saying who="WebDragon">mst: I was thinking more along the lines of filenames and irc nicknames than perl variables</saying>
+          <saying who="mst">WebDragon: ah. fair enough :)</saying>
+          <me_is who="WebDragon">doesn't use camelcase for perlvars</me_is>
+          <saying who="mst">WebDragon: then I shall cease complaining :)</saying>
+          <saying who="avar">${"Insert a descriptive essay about the variable here"}</saying>
+          <saying who="WebDragon">rofl</saying>
+          <saying who="rindolf">avar: that won't work with 'use strict 'refs''</saying>
+          <saying who="WebDragon">avar: I've seen things like that in RL and had recurring nightmares about them when I saw similar and sometimes worse things on thedailywtf.com</saying>
+          <saying who="mst">rindolf: ${main::}{"Insert a descriptive essay about the variable here"} would :)</saying>
+          <saying who="mst">rindolf: or you could just use %_ :)</saying>
+          <saying who="dkr">my boss still occasionally uses vars like $x. still trying to beat that behavior out of him</saying>
+          <me_is who="WebDragon">only uses x|y|z for cartesian coordinate math</me_is>
+          <saying who="WebDragon">which, since I hardly ever do any of that, means the obvious</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>What's in a variable name?</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perlcafe-watched-the-fountain">
+      <meta>
+        <title>Watched the fountain on Freenode's #perlcafe</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="mofino">watched the Fountain</saying>
+          <saying who="mofino">pretty cool'</saying>
+          <saying who="q[ender]">yep</saying>
+          <saying who="sili">what?</saying>
+          <saying who="sili">you think The Fountain was cool?</saying>
+          <saying who="sili">it was pretty artsy.</saying>
+          <saying who="sili">I don't understand the necessity of repeating that same scene 50k times, though.</saying>
+          <saying who="mofino">then you didn't get the movie</saying>
+          <saying who="rindolf">sili: if you repeat a scene 50k times, then the movie will have less entropy and will compress better.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Watched the fountain on Freenode's #perlcafe</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="commitment-to-prog-langs">
+      <meta>
+        <title>Commiting yourself to a programming language on Freenode's #perl.</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="convivial">high-rez, but I don't know enough to help you because I am a newbie to perl programming and although I am in deep luv with perl and planning on marrying perl, I still have a lot to learn.</saying>
+          <saying who="rindolf">convivial: you can only marry Perl if polygamy is legal where you live.</saying>
+          <saying who="rindolf">convivial: because Perl and I are already married. :-D</saying>
+          <saying who="convivial">why is that? i'm single :)</saying>
+          <saying who="rindolf">convivial: but Perl isn't.</saying>
+          <saying who="convivial">oh crap !</saying>
+          <saying who="convivial">all the good languages are already married :(</saying>
+          <saying who="rindolf">convivial: COBOL is still single.</saying>
+          <saying who="rindolf">convivial: but I heard she's a total bitch.</saying>
+          <saying who="convivial">ewwwwwwwwwwww, so is JCL and no one is knocking down either of their doors</saying>
+          <saying who="convivial">rindolf, janet reno is single!</saying>
+          <saying who="rindolf">convivial: what kind of programming language is "Janet Reno"?</saying>
+          <saying who="convivial">:)</saying>
+          <saying who="convivial">she is a person</saying>
+          <saying who="rindolf">convivial: I'm not interested in people, I'm only interested in programming languages.</saying>
+          <saying who="shaldannon">rindolf: you should try Ada</saying>
+          <saying who="rindolf">shaldannon: Ada 95?</saying>
+          <saying who="shaldannon">yeah</saying>
+          <saying who="shaldannon">the syntax of Pascal, the power of Basic and the friendliness of Java</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Commiting yourself to a programming language on Freenode's #perl.</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-using-encyclopedias">
+      <meta>
+        <title>Making use of Encyclopedias at FreeNode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <me_is who="shaldannon">beats iank over the head with an encyclopedia</me_is>
+          <saying who="rindolf">shaldannon: all volumes of an encyclopedia?</saying>
+          <saying who="dwu">rindolf: ha</saying>
+          <saying who="shaldannon">rindolf: every last one of 'em</saying>
+          <saying who="rindolf">shaldannon: or perhaps a printout of the Wikipedia?</saying>
+          <saying who="iank">rindolf: the whole bookcase</saying>
+          <saying who="rindolf">shaldannon: which Encyclopedia?</saying>
+          <saying who="iank">rindolf: naw, just get the DVD :)</saying>
+          <saying who="shaldannon">rindolf: I couldn't lift that</saying>
+          <saying who="shaldannon">rindolf: Britanica</saying>
+          <saying who="iank">You could lift the DVD!</saying>
+          <saying who="dwu">shaldannon: Start. Working. Out.</saying>
+          <saying who="shaldannon">dwu: oh?</saying>
+          <saying who="dwu">shaldannon: Dude, being able to lift the Britannica is hot.</saying>
+          <me_is who="iank">-&gt; the internet</me_is>
+          <saying who="shaldannon">:-}</saying>
+          <saying who="dwu">Seriously.</saying>
+          <saying who="dwu">"I can hold the accepted knowledge of a percentage of the human race in my arms!" "Oh, god, that is so sexy."</saying>
+          <saying who="shaldannon">hahahaha</saying>
+          <saying who="dwu">Seriously. Smart is hot. Smart and funny... well.</saying>
+          <me_is who="shaldannon">is hillarious ;)</me_is>
+          <saying who="dwu">Uhm. kay.</saying>
+          <saying who="rindolf">If you start reading the wikipedia lexicographically, will you ever finish at the rate articles are added there?</saying>
+          <saying who="tarrybone">rindolf: yes (citation needed)</saying>
+          <saying who="dwu">ha</saying>
+          <saying who="shaldannon">lol @ tarrybone</saying>
+          <saying who="dwu">tarrybone++</saying>
+          <saying who="rindolf">This reminds me of James Bond 1, where the girl there read an encyclopedia, instead of going to school.</saying>
+          <saying who="yrlnry">Does anyone near Philadelphia want to come to my house and take away my 1920 Britannica?</saying>
+          <saying who="shaldannon">rindolf: hey...when I was in elementary school, I used to read the World Book encyclopedia instead of doing my homework</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Commiting yourself to a programming language on Freenode's #perl.</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-production-wtf-code">
+      <meta>
+        <title>Production WTF Code on #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="dwave">anyone envy me? i'm refactoring production code that uses the fact that "" is defined, as a hash key.</saying>
+          <saying who="dwave">if (ref $ref-&gt;{""} ne "ARRAY") {</saying>
+          <saying who="dwave">$ref-&gt;{""} = [$ref-&gt;{""},$_];</saying>
+          <saying who="dwave">} else {</saying>
+          <saying who="dwave">$ref-&gt;{""} = [@{$ref-&gt;{""}},$_];</saying>
+          <saying who="dwave">}</saying>
+          <saying who="dwave">:(</saying>
+          <saying who="iank">hey, that looks like fun.</saying>
+          <saying who="integral">Has the author been lynched yet?</saying>
+          <me_is who="integral">would have used "\0" :-P</me_is>
+          <saying who="dwave">the best of it all, is that it's an XML parser</saying>
+          <saying who="mauke">$ref-&gt;{""} = [ref $ref-&gt;{""} eq "ARRAY" ? @{$ref-&gt;{""}} : $ref-&gt;{""}, $_]; # fixed</saying>
+          <saying who="rindolf">dwave: does this XML parser makes use of an existing XML parser from CPAN?</saying>
+          <saying who="rindolf">dwave: or does it do everything from scratch?</saying>
+          <saying who="dwave">rindolf: everything from scratch :)</saying>
+          <saying who="rindolf">dwave: nice!</saying>
+          <saying who="dwave">i'm trying to get rid of it</saying>
+          <saying who="rindolf">dwave: re-inventing square wheels.</saying>
+          <saying who="dwave">there's a home made unicode lib too</saying>
+          <saying who="dwave">!</saying>
+          <saying who="rindolf">dwave: ouch!</saying>
+          <saying who="shaldannon">nice</saying>
+          <saying who="iank">Brilliant!</saying>
+          <saying who="shaldannon">dwave: I suggest a dailywtf.com submission</saying>
+          <saying who="rindolf">dwave: yeah, I second shaldannon</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Production WTF Code on #perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-versions-of-software">
+      <meta>
+        <title>Versions of Software on FreeNode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="bp31416">rindolf: I command you both, to uninstall it, and install SuSE10.2 =P</saying>
+          <saying who="jagerman">"versions" are so annoying.</saying>
+          <saying who="jagerman">"I use Linux 10.2!"</saying>
+          <saying who="iank">jagerman: I had a friend who insisted the answer to the question "What version of the kernel are you running?" was "gnome".</saying>
+          <saying who="jagerman">eval: $POE::Kernel::VERSION</saying>
+          <saying who="buubot">jagerman: 1.2173</saying>
+          <saying who="jagerman">\o/</saying>
+          <saying who="Terminus">heh, a friend of mine only remembers me running ximian a few years ago and he keeps on asking me, "why don't you run ximian again?" where ximian == OS for him.</saying>
+          <saying who="bp31416">jagerman: could be worse lingo-wise, in tech-support many folks asking on Q about 'THEIR internet' isn't working, or 'does it have internet installed?', I .....like.... sir.... when did you manage to buy the internet in whole? ....... ahhhh... the internet is not a socket you plug in any of the ports sir</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Versions of Software</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="extreme-programming-as-a-religion">
+      <meta>
+        <title>The Holy Extreme Programming in Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">"We're doing XP [= Extreme Programming] here, so you need to know Ruby, you need to know Design Patterns and you need to know Refactoring."</saying>
+          <saying who="rindolf">XP may have become a religion.</saying>
+          <saying who="ew73">I Refactored yesterday!</saying>
+          <saying who="rindolf">ew73: using which refactoring pattern?</saying>
+          <saying who="ew73">Leviticus 13:22</saying>
+          <saying who="Somni">well you will keep refactoring until you get it right!</saying>
+          <me_is who="rindolf">extracts the ew73 method.</me_is>
+          <saying who="rindolf">ew73: this is one of my favourite refactoring patterns.</saying>
+          <me_is who="ew73">idly looks up said passage, just to see if it's any good.</me_is>
+          <saying who="integral">What do you have to know to claim you know refactoring?</saying>
+          <saying who="integral">How to click buttons in the right Eclipse menu?</saying>
+          <saying who="rindolf">integral: the code is in Ruby.</saying>
+          <saying who="integral">Ruby is too cool to be in Eclipse?</saying>
+          <saying who="ew73">integral: One time, I moved all this stuff to another subroutine!</saying>
+          <saying who="ew73">Lev. 13:22. And if it spread, he shall judge him to have the leprosy:</saying>
+          <saying who="rindolf">integral: no, but you cannot refactor Ruby code automatically using Eclipse.</saying>
+          <saying who="integral">One time I wrote all this code, but when I was about to go home I found I'd left my brain at home! LOLZ</saying>
+          <saying who="integral">ew73: good butter advert in that</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Extreme Programming as a Religion</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="be-here-or-not-be-here">
+      <meta>
+        <title>To be here or not to be here on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">Hi all.</saying>
+          <saying who="rindolf">LeoNerd: here?</saying>
+          <saying who="LeoNerd">rindolf: Maybe</saying>
+          <saying who="rindolf">LeoNerd: "be here or be not here - there is no maybe"</saying>
+          <saying who="LeoNerd">:)</saying>
+          <saying who="rindolf">LeoNerd: a.k.a the law of the exclusion of the middle.</saying>
+          <saying who="dwu">I think Yoda phrased that one best.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>To be here or not to be here on Freenode's #perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-monkey-business">
+      <meta>
+        <title>Monkey Business at Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="perlmonkey">thats just...mental</saying>
+          <saying who="rindolf">perlmonkey2: still here?</saying>
+          <saying who="perlmonkey2">rindolf: hi</saying>
+          <saying who="rindolf">perlmonkey2: hi.</saying>
+          <saying who="perlmonkey">phew</saying>
+          <saying who="rindolf">perlmonkey2: now we have two Perl monkeys.</saying>
+          <saying who="perlmonkey2">hah</saying>
+          <saying who="perlmonkey2">good stuff</saying>
+          <saying who="perlmonkey2">You can never have too many.</saying>
+          <saying who="PeaceNLove">To produce good stuff like Shakespeare's works, we need an infinite number of monkeys</saying>
+          <saying who="perlmonkey">we're starting a monkey clan</saying>
+          <saying who="rindolf">PeaceNLove: heh.</saying>
+          <saying who="rindolf">PeaceNLove: and to write like a monkey we need a million Shakespeares.</saying>
+          <saying who="PeaceNLove">perlmonkey, reproduce and multiply, God be with you</saying>
+          <saying who="perlmonkey2">PeaceNLove: You can, of course, do anything with an infinite number of perl monkeys.</saying>
+          <saying who="perlmonkey2">PeaceNLove: Actually a million monkeys on a million typewriters would most probably have not created Hamlet if they started at the beginning of the Universe.</saying>
+          <saying who="PeaceNLove">perlmonkey2, that's fine, the Universe has not ended yet, they have time </saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Monkey Business at Freenode's #perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-offtopic-not-a-bug">
+      <meta>
+        <title>Not a bug on #offtopic on OFTC</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">sarnold: you go to OGI?</saying>
+          <saying who="sarnold">rindolf: no; but my boss and a co-worker are professors there, and other co-workers earned degrees there..</saying>
+          <saying who="rindolf">sarnold: OK.</saying>
+          <saying who="muli">sarnold, have you got one of those pesky things?</saying>
+          <saying who="sarnold">muli: just Bachelor of Arts .. no Masters or Ph.D...</saying>
+          <saying who="rindolf">sarnold: B.Sc or B.A.?</saying>
+          <saying who="muli">rindolf, Bachelor of Arts is B.A. </saying>
+          <saying who="rindolf">muli: I know. But I was just checking.</saying>
+          <saying who="sarnold">rindolf: ah, you're right, B.Sc.. I chickened out on the language  requirements :)</saying>
+          <saying who="rindolf">muli: see?? LOL.</saying>
+          <saying who="muli">rindolf, sometimes, two bugs cancel each other.  </saying>
+          <saying who="rindolf">muli: wisely spoken.</saying>
+          <saying who="rindolf">But mine wasn't a bug - it was a sanity check.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Not a bug</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-who-youre-gonna-call">
+      <meta>
+        <title>Who you're gonna call on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">Hmmm... xchat-perl is gone.</saying>
+          <saying who="f00li5h">OH NOES! ## what's that for then?</saying>
+          <saying who="rindolf">Who you're gonna call? Bug-busters!!</saying>
+          <saying who="Khisanth">rindolf: never existed, unless you are using an rpm based system</saying>
+          <saying who="rindolf">Khisanth: I am.</saying>
+          <saying who="f00li5h">I AINT AFRAID OF NO BUG!</saying>
+          <saying who="rindolf">f00li5h: heh.</saying>
+          <saying who="f00li5h">when there's something wierd and in your code base, who you gonna call?</saying>
+          <saying who="railbait">f00li5h: The police?</saying>
+          <saying who="f00li5h">railbait: BUG BUSTERS!</saying>
+          <saying who="f00li5h">we test it with science then blow it up</saying>
+          <saying who="f00li5h">... or is that someone else</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Who you're gonna call?</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-tribute-to-the-prisoner">
+      <meta>
+        <title>Tribute to the Prisoner on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="Hazard">How do I look up @- in the perldocs?</saying>
+          <saying who="rindolf">Hazard: perldoc perlvar</saying>
+          <saying who="Hazard">rindolf: Thanks.</saying>
+          <saying who="Daveman">perldoc rindolf</saying>
+          <saying who="Hazard">I don't know what I'd do without IRC.</saying>
+          <saying who="rindolf">Daveman: I am not a pragma! I'm a free man!</saying>
+          <saying who="Hazard">I couldn't even google that.</saying>
+          <saying who="rindolf">use Daveman (qw(silliness));</saying>
+          <me_is who="jetscreamer">sends rindolf back to the village</me_is>
+          <saying who="rindolf">jetscreamer: is it a Perlisoner village where everyone becomes a pragma?</saying>
+          <saying who="jetscreamer">and lots of perlBalloons</saying>
+          <saying who="Daveman">gumbybrain, how do i make teh web wit shlomi!?</saying>
+          <saying who="rindolf">jetscreamer: Perloons.</saying>
+          <saying who="rindolf">jetscreamer: Perlunatics.</saying>
+          <saying who="apeiron">Perlarks.</saying>
+          <saying who="Daveman">perlaugh </saying>
+      </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Tribute to the Prisoner</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="the-messiah-of-perl">
+      <meta>
+        <title>The Messiah of Perl on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="ubajas">Technically, my first language was Turbo Pascal, but I started over with Perl 10 years later (not having programmed in the meantime). I'm obviously damaged goods.</saying>
+          <saying who="iank">ubajas: heh, I read that as "I started with (perl 10) (years later)" instead of "I started with perl (10 years later)" :)</saying>
+          <saying who="rindolf">Perl 10!</saying>
+          <saying who="rindolf">Perl for the Fourth Millenium.</saying>
+          <saying who="jagerman">I thought Perl 6 was supposed to be timeless</saying>
+          <saying who="ubajas">iank: Maybe I should have added a comma. :-]</saying>
+          <saying who="jagerman">Perl ∞</saying>
+          <saying who="iank">perl6 has existed since the beginning of time, or at least it will have existed since then once $Larry finds a time machine.</saying>
+          <saying who="simcop2387">iank: i'm sorry but larry is the prophet i am the messanger! i will be the one to take it back!</saying>
+          <saying who="iank">WHAT.</saying>
+          <saying who="simcop2387">iank: its MY TIME MACHINE!</saying>
+          <me_is who="iank">smacks simcop2387 around</me_is>
+          <saying who="jagerman">iank: So it'll be like that Star Trek episode, where they say that the development of computers are caused by time travel from the future?</saying>
+          <saying who="jagerman">Except that they were too stupid (like most Voyager writers) to get their facts right, and thought computers started in the 70s</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>The Messiah of Perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-one-rindolf-each">
+      <meta>
+        <title>One rindolf Each on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="milardovich">with strict it say me this:</saying>
+          <saying who="milardovich">Global symbol "$lorem" requires explicit package name at split.pl line 3.</saying>
+          <saying who="rindolf">milardovich: use "my $lorem = "</saying>
+          <saying who="rindolf">milardovich: my is your friend.</saying>
+          <saying who="rindolf">pun not intended.</saying>
+          <saying who="rindolf">my is my friend.</saying>
+          <saying who="dwu">Preferably with a real value after "= " ^.^</saying>
+          <saying who="rindolf">dwu: he already has that.</saying>
+          <saying who="milardovich">that works with my rindolf</saying>
+          <saying who="milardovich">thaks you!!!</saying>
+          <saying who="rindolf">milardovich: you're welcome.</saying>
+          <saying who="milardovich">:)</saying>
+          <saying who="ubajas">I wish I had a rindolf too. :-\</saying>
+          <saying who="milardovich">people here are "nicer" than on #php :P</saying>
+          <saying who="rindolf">ubajas: I'm mass-produced at Chines sweat-shops.</saying>
+          <saying who="ubajas">hehe</saying>
+          <saying who="rindolf">ubajas: they sell me for 30 bucks a piece.</saying>
+          <saying who="rindolf">milardovich: I've heard some horrible stories about ##php.</saying>
+          <saying who="milardovich">perl rulz x)</saying>
+          <saying who="rindolf">milardovich: what brings you to Perl?</saying>
+          <saying who="simcop2387">rindolf: #php apparantly</saying>
+          <saying who="rindolf">simcop2387: heh.</saying>
+          <saying who="rindolf">simcop2387++</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>One rindolf Each on Freenode's #perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-are-you-being-verbed">
+      <meta>
+        <title>Are you being verbed on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">cl1: what do you do at work?</saying>
+          <saying who="cl1">i write code :D</saying>
+          <saying who="rindolf">cl1: naturally.</saying>
+          <saying who="rindolf">cl1: to do what?</saying>
+          <saying who="cl1">right now at this contract, i'm working with .net, c#, asp.net and pl/sql</saying>
+          <saying who="rindolf">cl1: sounds enterprisey.</saying>
+          <saying who="BinGOs">please don't turn enterprise into a verb.</saying>
+          <saying who="rindolf">BinGOs: enterprisey is an adjective, not a verb.</saying>
+          <saying who="LeoNerd">Enterprizationaliseation?</saying>
+          <saying who="BinGOs">okay.</saying>
+          <saying who="cl1">lol @ enterprisey</saying>
+          <saying who="rindolf">GumbyBRAIN: BinGOs me!</saying>
+          <saying who="GumbyBRAIN">i tend to be good, it doesn't want me to buy an island utopia (you'll get used to bother me.</saying>
+          <saying who="BinGOs">But it is a noun and no more.</saying>
+          <saying who="BinGOs">mmmkay.</saying>
+          <saying who="dwu">BinGOs: Actually, it's also an adjective. Even without "y".</saying>
+          <saying who="BinGOs">I HATE YOU ALL.</saying>
+          <me_is who="dwu">grin</me_is>
+          <saying who="BinGOs">CRITIQUE IS DEFINITELY A FUCKING NOUN.</saying>
+          <saying who="dwu">It's also a verb.</saying>
+          <saying who="BinGOs">NO IT ISN'T</saying>
+          <saying who="simcop2387">BinGOs: i shall critique your use of critique</saying>
+          <saying who="BinGOs">JUST BECAUSE SOME DAMNED YANKEE SCUM DECIDE IT IS, DOES NOT MAKE IT SO.</saying>
+          <saying who="dwu">It's been used since the 18th century.</saying>
+          <saying who="rindolf">BinGOs: dwued!</saying>
+          <saying who="BinGOs">I refer you to my earlier hate.</saying>
+          <saying who="dwu">I refer you to your fail.</saying>
+          <saying who="icke">not earlier than 18th century</saying>
+          <saying who="dwu">I really shouldn't. It's mean. But I will.</saying>
+          <saying who="dwu">Because I'm mean.</saying>
+          <saying who="dwu">icke: Hence "since".</saying>
+          <saying who="dwu">'criticises'.</saying>
+          <saying who="BinGOs">My fail-gun appears to firing backwards. Damn thing.</saying>
+          <saying who="dwu">Your fail gun is... failing?</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Are you being verbed on Freenode's #perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="how-much-perl-do-you-need">
+      <meta>
+        <title>How much Perl do you need at Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="shishirm1">is pop3 module avaliable only in perl 5?</saying>
+          <saying who="jernster">are you saying you use something other than 5?</saying>
+          <saying who="icke">perl 4 didn't even have modules</saying>
+          <saying who="jernster">heh</saying>
+          <saying who="rindolf">shishirm1: do you want to use it with Perl 4?</saying>
+          <saying who="shishirm1">oh ok sorry i am comlete nooob!! so i am just asking you guys</saying>
+          <saying who="shishirm1">nope is perl 5 a standard now?</saying>
+          <saying who="jernster">yes</saying>
+          <saying who="shishirm1">ok great...</saying>
+          <saying who="jernster">:)</saying>
+          <saying who="rindolf">shishirm1: Perl 4 is unmaintained, unloved, deprecated, not recommended, and dead - D. E. D. - DEAD!</saying>
+          <saying who="simcop2387-lap">perl 4 is an EXPERL!</saying>
+          <saying who="simcop2387-lap">all statements that perl4 is a going concern are thus inoperative.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>How much Perl do you need at Freenode's #perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-conditional-inheritance-refactoring">
+      <meta>
+        <title>Conditional-to-Inheritance Refactoring on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="edeca">Hrm. More infernal questions, mainly because I am trying to make my perl prettier and contain less nasty if's. I have $foo and $bar which are obtained from split(/ /, 'kitten loving'). But I don't want undef if the split fails, I'd rather '' for $bar or both. What's the nicest way to do that?</saying>
+          <saying who="Khisanth">($foo, $bar) = map { $_ // "" } split / /, $str; # 5.10 version :)</saying>
+          <saying who="edeca">Noo 5.10! :)</saying>
+          <saying who="Khisanth">($foo, $bar) = map { defined $_ ? $_ : "" } split / /, $str; # probably some other shorter ways too</saying>
+          <saying who="rindolf">edeca: [bad idea] you can also try using the conditional-&gt;inheritance refactoring.</saying>
+          <saying who="rindolf">:-)</saying>
+          <me_is who="Khisanth">pours boiling coffee on rindolf</me_is>
+          <saying who="rindolf">Khisanth: I hate coffee, but I guess I deserved it.</saying>
+          <saying who="rindolf">That was a joke, of course.</saying>
+          <saying who="Khisanth">you weren't really supposed to like having boiling anything poured on you but I guess you are into the kinkier stuff</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Conditional-to-Inheritance Refactoring on Freenode's #perl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-geek-love">
+      <meta>
+        <title>Geek love on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">rbastic: QBasic was the sh*t!</saying>
+          <saying who="rindolf">rbastic: well, not really.</saying>
+          <saying who="rbastic">rindolf: yup, that language is responsible for me having gotten into programming to begin with.</saying>
+          <saying who="rbastic">8 yrs old and writing qbasic scripts with QBasic for Dummies by my side</saying>
+          <saying who="rindolf">rbastic: I started when I was 10.</saying>
+          <saying who="rindolf">rbastic: I know some people who started much later.</saying>
+          <saying who="talexb">Late bloomer .. didn't start till I was 15.</saying>
+          <saying who="Zoffix">heh, I started at 14... I could not have a computer before that</saying>
+          <saying who="rindolf">rbastic: but I know a girl who started programming when she was 6.</saying>
+          <saying who="rindolf">Or was it 8?</saying>
+          <saying who="Zoffix">rindolf, CAN HAS PHONE NUMBER?!</saying>
+          <saying who="rbastic">lol</saying>
+          <saying who="rindolf">Zoffix: NO CAN!</saying>
+          <saying who="Zoffix">:(</saying>
+          <saying who="rindolf">Zoffix: only have her MSN.</saying>
+          <saying who="Zoffix">gimmegimmegimme</saying>
+          <saying who="talexb">Heh.</saying>
+          <saying who="Zoffix">:)</saying>
+          <saying who="rindolf">Zoffix: LOL.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Geek Love</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-grand-uni-prog-lang">
+      <meta>
+        <title>The Grand Unified Programming Language</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rbastic">Juerd: eh in today's world of heavy JS on the clientside, i think it makes a little more sense to use the same lang. everywhere</saying>
+          <saying who="Juerd">rbastic: JS on the client side is because often it's the only option the universe provides.</saying>
+          <saying who="rbastic">Juerd: from a business perspective, you reduce the complexity and potential difficulties in finding new hires with the same skillset</saying>
+          <saying who="rindolf">rbastic: have you heard of RJS?</saying>
+          <saying who="Juerd">rbastic: On the server side, however, you have great freedom.</saying>
+          <saying who="rbastic">rindolf: no, what's that?</saying>
+          <saying who="Caelum">larry wants perl6 to run on javascript :)</saying>
+          <saying who="rindolf">rbastic: "One Language; and One Sayings".</saying>
+          <saying who="Juerd">rbastic: Exactly. I would never hire a server side programmer who knows *only* Javascript, and is too stupid to learn whatever we're using on the server side.</saying>
+          <saying who="rindolf">rbastic: my translation to a sentence from the Tower of Babel myth.</saying>
+          <saying who="rbastic">Juerd: i'll agree with that also. any real programmer knows or has at least coded in half a dozen languages before</saying>
+          <saying who="Juerd">From a business perspective, you should avoid crap coders at all cost.</saying>
+          <saying who="Juerd">Knows *or* has coded... Hmmm...!</saying>
+          <saying who="rindolf">rbastic: though according to what most scholars believe it was not about using one language but rather thinking the same.</saying>
+          <saying who="Juerd">I hope they haven't coded in half a dozen languages without knowing them.</saying>
+          <saying who="Juerd">That'd be scary.</saying>
+          <saying who="zshzn">Reality is scary, Juerd</saying>
+          <saying who="talexb">Hmm, BASIC, FORTRAN, COBOL, assembler, C, more assembler, C, Pascal ... Perl!</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>The Grand Unified Programming Language</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-can-i-haz-fast-compiler">
+      <meta>
+        <title>Can I haz a fast compiler on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">rbastic: now I'm working with C++.</saying>
+          <saying who="rindolf">rbastic: I found out that my project compiles really quickly.</saying>
+          <saying who="rindolf">rbastic: under 5 or 10 minutes on a P4-2.4GHz with 1 GB of RAM.</saying>
+          <saying who="rindolf">rbastic: maybe KDE is making g++ look bad.</saying>
+          <saying who="rbastic">rindolf: yeah, i'm not a big KDE fan</saying>
+          <saying who="rindolf">rbastic: actually I'm using KDE-3.5.8 here.</saying>
+          <saying who="rindolf">rbastic: I was talking about the compilation speed of KDE apps and KDE itself.</saying>
+          <saying who="rindolf">rbastic: possibly because each file has half-a-gazillion headers.</saying>
+          <saying who="rindolf">My C++ code is a server one, so we don't have too many deps.</saying>
+          <saying who="rbastic">yeah, isn't there a way to cache header files? ie. in their "compiled" form?</saying>
+          <saying who="rbastic">or is that something I'm remembering from some other programming language that purported to build on top of C?</saying>
+          <saying who="rindolf">rbastic: MSVC has that.</saying>
+          <saying who="rbastic">ahh, nods</saying>
+          <saying who="rindolf">rbastic: no, Visual C++ has precompiled headers.</saying>
+          <saying who="rindolf">rbastic: I remember that I kept deleting them.</saying>
+          <saying who="rbastic">yeah, couldn't remember</saying>
+          <saying who="rbastic">lol</saying>
+          <saying who="rindolf">Pascal compiles very quickly.</saying>
+          <saying who="rindolf">That's one of the things I enjoyed in Delphi.</saying>
+          <saying who="rbastic">ugh, the app i'm been maintaining in Java was originally a fat client/server desktop app, written in Delphi</saying>
+          <saying who="rindolf">rbastic: ah.</saying>
+          <saying who="rbastic">i remember booting up the old app for the first time, and being amazed at how slow it was</saying>
+          <saying who="rbastic">eventually, i had to duplicate a feature in the Java code and i wasn't sure how it was implemented before</saying>
+          <saying who="rindolf">rbastic: you mean the Java app is faster? :S</saying>
+          <saying who="rbastic">so being as i had no Delphi experience, and the newer Delphi environments made NO sense to me at all, i just opened up the SQL Server query analyzer</saying>
+          <saying who="rbastic">rindolf: yes, but only b/c the Delphi programmer was an idiot, issuing queries over and over again needlessly</saying>
+          <saying who="rbastic">rindolf: if you could've seen the MSSQL Performance Analyzer or whatever, it was basically just.. Query1, Query2, Query3, Query1, Query2, Query3, repeat.</saying>
+          <saying who="rbastic">it was probably the worst ive ever seen in my life.. belongs on www.thedailywtf.com </saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Can I haz a fast compiler</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-think-too-much">
+      <meta>
+        <title>I think too much - therefore I blog too much on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">scrottie: hi.</saying>
+          <saying who="scrottie">hi rindolf!</saying>
+          <saying who="rindolf">scrottie: are you the scrottie from use.perl.org?</saying>
+          <saying who="scrottie">yeah.</saying>
+          <saying who="rindolf">scrottie: ah, nice to meet you.</saying>
+          <saying who="rindolf">Well, chat with you on IRC at least.</saying>
+          <me_is who="scrottie">cowers from the swinging fist probably coming his way</me_is>
+          <saying who="rindolf">scrottie: I'm "Shlomi%20Fish"</saying>
+          <saying who="scrottie">oh, heh, thanks</saying>
+          <saying who="rindolf">It's a curse.</saying>
+          <saying who="scrottie">hmm. i vaguely remember interesting stuff from you but can't honestly place what.</saying>
+          <saying who="scrottie">I know I've seen you around here before too.</saying>
+          <saying who="rindolf">Yeah, my use.perl.org blog is mostly technical and perl-related.</saying>
+          <saying who="scrottie">I post on use.perl.org entirely too much.</saying>
+          <saying who="rindolf">So it may be a bit boring.</saying>
+          <saying who="rindolf">Sometimes it's a bit philosophical.</saying>
+          <saying who="rindolf">scrottie: yes.</saying>
+          <saying who="scrottie">heh. and mine is offensively off-topic.</saying>
+          <saying who="rindolf">scrottie: I have other blogs.</saying>
+          <saying who="scrottie">I've posted to livejournal twice!</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>I think too much - therefore I blog too much</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-how-intrusive">
+      <meta>
+        <title>"How intrusive do you want your text to be?" on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">Can we add styles like &lt;b&gt;, &lt;i&gt;, etc.?</saying>
+          <saying who="rindolf">Or colours?</saying>
+          <saying who="rindolf">Or blink?</saying>
+          <saying who="rindolf">Or images?</saying>
+          <saying who="rindolf">Or flash applets?</saying>
+          <saying who="scrottie">&lt;banner&gt;!</saying>
+          <saying who="alanhaggai">rindolf: No I think. Google's Web Application does not allow them. It is just a &lt;textarea&gt;. </saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>How intrusive do you want your text to be?</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-sharp-pearl">
+      <meta>
+        <title>Freenode's #pearl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">scrottie: you are a native English speaker right?</saying>
+          <saying who="rindolf">scrottie: do you know #linguistics ?</saying>
+          <saying who="scrottie">not familiar with #linguistics, yes, I am a native English speaker, but my spelling is atr... my spelling is terrible.</saying>
+          <saying who="rindolf">atrocious?</saying>
+          <saying who="scrottie">yeah, that</saying>
+          <saying who="scrottie">I have an xterm dedicated to dict/spell</saying>
+          <saying who="rindolf">scrottie: spelling is probably easy to fix using aspell.</saying>
+          <saying who="rindolf">scrottie: heh.</saying>
+          <saying who="rindolf">scrottie: I'm using xchat which has an red-line for spelling mistakes.</saying>
+          <saying who="rindolf">Very useful.</saying>
+          <saying who="rindolf">Too bad I'm using British spelling where it sometimes misbehaves.</saying>
+          <saying who="rindolf">aspell, I mean.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Freenode's #pearl</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="sharp-perl-lame-even">
+      <meta>
+        <title>"Lame even" on Freenode's #perl</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="rindolf">A lot of ise's [in Aspell's British Spelling checker] are false  positivies.</saying>
+          <saying who="rindolf">positives even.</saying>
+          <saying who="rindolf">People who say $minor_spelling_correction even, are lam.</saying>
+          <saying who="rindolf">lame even.</saying>
+          <saying who="rindolf">I never get tired of these self-referential jokes.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Lame even</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="third-sharp-perl-reich">
+      <meta>
+        <title>The Third #perl Reich (on Freenode #perl).</title>
+      </meta>
+      <irc>
+        <body>
+          <saying who="scrottie">The tech side was there... but I was stuck with my fucking graphics I did in crayon. I kid you not. Crayon.</saying>
+          <saying who="scrottie">It was a cry for help.</saying>
+          <saying who="scrottie">Programmers will work with each other on fun projects, but graphic designers never get involved in stuff like that.</saying>
+          <saying who="rindolf">scrottie: ah.</saying>
+          <saying who="scrottie">then there's kingdomofloathing.com... stick figures.</saying>
+          <saying who="rindolf">scrottie: there are some graphic designers who contribute to KDE, GNOME, etc.</saying>
+          <saying who="scrottie">fuck graphic artists. we should round them all up and burn them.</saying>
+          <saying who="rindolf">scrottie: heh.</saying>
+          <saying who="scrottie">okay, they can live.</saying>
+          <saying who="rindolf">scrottie: scrotitler!</saying>
+          <saying who="scrottie">the rest get burnt though.</saying>
+          <saying who="rindolf">"He who starts by burning graphics desginers will end up burning programmers."</saying>
+          <saying who="scrottie">only the ASP and PHP programmers... then we'll see where things are at and re-evaluate the plan.</saying>
+          <saying who="rindolf">First they came to the graphics designers...</saying>
+          <saying who="Khisanth">then they came for more graphics designers</saying>
+          <saying who="rindolf">scrottie: I knew some very nice PHP programmers.</saying>
+          <saying who="rindolf">And VB ones.</saying>
+          <saying who="scrottie">yeah, me too. real shame.</saying>
+          <saying who="rindolf">scrottie: I still know some PHP programmers.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>The Third #perl Reich (on Freenode #perl).</tagline>
+        </info>
+      </irc>
+    </fortune>
+    <fortune id="the-name-bunny">
+      <meta>
+        <title>The Name "Bunny"</title>
+      </meta>
+      <irc>
+          <body>
+<joins who="B-rabbit">has joined #perl</joins>
+<saying who="rindolf">B-rabbit? I know a B-rat on #linguistics.</saying>
+<saying who="B-rabbit">rindolf, cool =]</saying>
+<saying who="rindolf">B-rabbit: ok.</saying>
+<saying who="B-rabbit">my full name is bunny rabbit bt w :)</saying>
+<saying who="B-rabbit">hehe</saying>
+<saying who="rindolf">B-rabbit: ah.</saying>
+<saying who="rindolf">B-rabbit: "bunny" is a female name.</saying>
+<saying who="B-rabbit">lol</saying>
+<saying who="pippijn">rindolf: correct</saying>
+<saying who="pippijn">I know a bunny</saying>
+<saying who="rindolf">Or a Playboy bunny.</saying>
+<saying who="ik">rindolf: bunny is a stripper name</saying>
+<saying who="pippijn">friends call her bun</saying>
+<saying who="ik">pippijn: is she a stripper?</saying>
+<saying who="B-rabbit">rindolf, i am a male lol x sorry to disappoint u</saying>
+<saying who="rindolf">"IRC: Where men are men, women are men, and the kids are FBI agents."</saying>
+<saying who="rindolf">B-rabbit: ok, no problem.</saying>
+<saying who="ik">pippijn: she should change her name</saying>
+<saying who="pippijn">ik: it doesn't hurt her</saying>
+<saying who="ik">pippijn: right, but she's violating a fundamental law</saying>
+<saying who="ik">pippijn: she either needs to change her name or become a stripper</saying>
+<saying who="rindolf">ik: I think the other option is better.</saying>
+<saying who="pippijn">ik: she'd probably become a stripper rather than changing her name</saying>
+<saying who="rindolf">pippijn: LOL.</saying>
+<saying who="ik">rindolf: yeah, but you're creepy</saying>
+<saying who="rindolf">I think I'll make a fortune out of it.</saying>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>The Name "Bunny"</tagline>
+        </info>
+      </irc>
+    </fortune>
+<fortune id="the-anti-school-anti">
+        <meta>
+            <title>The Anti-School nazi</title>
+        </meta>
+        <irc>
+            <body>
+<saying who="dazjorz">Hi rindolf :)</saying>
+<saying who="rindolf">Hi dazjorz </saying>
+<saying who="rindolf">dazjorz: what&#39;s up?</saying>
+<saying who="rindolf">dazjorz: No Tests for You?</saying>
+<saying who="rindolf">No *more</saying>
+<saying who="dazjorz">No more tests :)</saying>
+<saying who="rindolf">dazjorz: No more tests for you!!! For three months!</saying>
+<saying who="rindolf">dazjorz: nice!</saying>
+<saying who="dazjorz">:D</saying>
+<saying who="dazjorz">Two, I think</saying>
+</body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>The anti-School nazi</tagline>
+        </info>
+</irc>
+</fortune>
+<fortune id="emulating-a-newbie-on-perl">
+        <meta>
+            <title>Emulating a Newbie on Perl</title>
+        </meta>
+        <irc>
+            <body>
+<saying who="yrlnry">Hi, I heard that Perl is just HTML with some sort of macro preprocessor attached.  So I thought you would be the right people to ask about whether there is a way to make the submitted value on an &lt;input type=submit&gt; different from the visible label on the button.</saying>
+<saying who="yrlnry">Thanks in advance.</saying>
+<me_is who="Roderick">tars and feathers yrlnry.</me_is>
+<saying who="yrlnry">Hi, Roderick!  How&#39;s the kid?</saying>
+<saying who="Somni">you have been misinformed, sir; Perl is just a regex engine with named variables</saying>
+<saying who="ne2k__">yrlnry: that is possibly one of the oddest questions I have ever heard</saying>
+<saying who="yrlnry">ne2k__: What&#39;s odd about &quot;How&#39;s the kid?&quot;</saying>
+<saying who="yrlnry">You need to get out more, seriously.</saying>
+<saying who="ne2k__">yrlnry: I meant the original question</saying>
+<saying who="Roderick">Congratulations, I hope it&#39;s going well.</saying>
+<saying who="yrlnry">Do you know that Jewish folktale about the man who lives in a tiny hut with his wife and kids and they can&#39;t stand the crowding any more, so they go to the rabbi for advice, and the rabbit suggests that they bring the chickens, goat, and cow into the house too?</saying>
+<saying who="ne2k__">yrlnry: not that it has anything to do with perl, but the &lt;input&gt; tag in HTML has both &quot;name&quot; and &quot;value&quot; attributes. the value is what gets shown in the browser typically.</saying>
+<saying who="yrlnry">ne2k__: yes, and the value is also what is submitted when someone presses the button, but I want the displayed label to be different from what it submitted, as it is say with &lt;option ...&gt;</saying>
+</body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>yrlnry as a Perl newbie</tagline>
+        </info>
+</irc>
+</fortune>
+<fortune id="which-prefix-do-you-want">
+        <meta>
+            <title>Which Prefix do You Want Today?</title>
+        </meta>
+        <irc>
+            <body>
+<saying who="mMish">hi rind</saying>
+<saying who="rindolf">Hi mMish </saying>
+<saying who="rindolf">mMish: now you&#39;re mMish ?</saying>
+<saying who="rindolf">mMish: are you eMish, oMish, aMish , etc?</saying>
+<saying who="mMish">yes</saying>
+<saying who="rindolf">mMish: ah, nice.</saying>
+<saying who="mMish">depends on the mood</saying>
+<saying who="rindolf">GumbyBRAIN: how many nicks must a one IRCer have?</saying>
+<saying who="GumbyBRAIN">Oh, i lie, now it&#39;s stuck on posting things to do it.  You said you couldn&#39;t have one of many.</saying>
+<saying who="rindolf">mMish: ah OK.</saying>
+<saying who="rindolf">xMish</saying>
+<saying who="rindolf">iMish</saying>
+<saying who="rindolf">zMish</saying>
+<saying who="rindolf">Like the IBM computers.</saying>
+<saying who="rindolf">pMish</saying>
+<saying who="mMish">ppszMish &lt;--- HUngarian</saying>
+<saying who="rindolf">mMish: LOL.</saying>
+<saying who="rindolf">lpstrMish</saying>
+<saying who="dazjorz">is lpstr a function?</saying>
+<saying who="dazjorz">get_magic_quotes_gpcMish</saying>
+<saying who="rindolf">dazjorz: no, Long Pointer to string.</saying>
+<saying who="dazjorz">PHP++ :&#39;)</saying>
+<saying who="rindolf">dazjorz: why?</saying>
+<saying who="rindolf">perlbot: karma PHP</saying>
+<saying who="perlbot">Karma for PHP: -147</saying>
+<saying who="LeoNerd">It takes some nerve to say &quot;PHP++&quot; in #perl :P</saying>
+<saying who="dazjorz">rindolf: because they have get_magic_quotes_gpc!</saying>
+<saying who="dazjorz">don&#39;t we all love get_magic_quotes_gpc!</saying>
+<saying who="rindolf">dazjorz: oh.</saying>
+<saying who="dazjorz">it&#39;s a function</saying>
+<saying who="rindolf">dazjorz: love, hate - what&#39;s the difference.</saying>
+<saying who="rindolf">dazjorz: that does what?</saying>
+<saying who="dazjorz">to get the value of magic_quotes_gpc in the config file.</saying>
+<saying who="rindolf">dazjorz: ah.</saying>
+<saying who="dazjorz">so they have get_magic_quotes_gpc for get_ini(&#39;magic_quotes_gpc&#39;)</saying>
+<saying who="rindolf">dazjorz: LOL.</saying>
+<saying who="dazjorz">plus, there&#39;s the magic_quotes_gpc to escape all input a script gets via POST, GET and COOKIE.</saying>
+<saying who="rindolf">dazjorz: yes, sounds Evil.</saying>
+<saying who="rindolf">Just use placeholders.</saying>
+</body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Which Prefix do you Want today?</tagline>
+        </info>
+</irc>
+</fortune>
+<fortune id="sextalk-according-to-perlers">
+        <meta>
+            <title>Sextalk according to the cult of Perl</title>
+        </meta>
+        <irc>
+            <body>
+<saying who="krang">Hey all, what&#39;s the best way to call one perl script from another? I was thinking I&#39;d just use &#39;system(&quot;script.pl&quot;);&#39;</saying>
+<saying who="dazjorz">krang: yeah, that, or do &quot;script.pl&quot;</saying>
+<saying who="dazjorz">krang: depends on how seperated you want them to be</saying>
+<saying who="krang">dazjorz: you mean just a line that has &quot;script.pl&quot;; written on it?</saying>
+<saying who="Khisanth">you need the do as well</saying>
+<saying who="dazjorz">krang: no, exactly this: do &quot;script.pl&quot;;</saying>
+<saying who="rindolf">krang: system is usually what you want.</saying>
+<saying who="rindolf">krang: normally require or use are preferable to do</saying>
+<saying who="dazjorz">rindolf: that&#39;s for modules, isn&#39;t it ?</saying>
+<saying who="rindolf">dazjorz: yes.</saying>
+<saying who="dazjorz">wait, I think require &quot;script.pl&quot; would work too</saying>
+<saying who="rindolf">dazjorz: and doing code is not such a good idea.</saying>
+<saying who="dazjorz">rindolf: hmm?</saying>
+<saying who="krang">rindolf: what is doing anyway?</saying>
+<saying who="rindolf">dazjorz: I mean &quot;perldoc -f do&quot;-ing code.</saying>
+<saying who="rindolf">krang: do()-ing</saying>
+<saying who="rindolf">krang: it reads the file and evaluates it.</saying>
+<saying who="rindolf">krang: perldoc -f do.</saying>
+<saying who="dazjorz">rindolf: ah</saying>
+<saying who="dazjorz">rindolf: do {}</saying>
+<me_is who="rindolf">would rather be doing hot models than doing code. :-)</me_is>
+<saying who="dazjorz">rindolf: yeah, do BLOCK is quite useless</saying>
+<saying who="dazjorz">heh</saying>
+<saying who="rindolf">dazjorz: you can do my $var = do { ... }</saying>
+<me_is who="dazjorz">would rather be doing GumbyBRAIN than doing code</me_is>
+<saying who="GumbyBRAIN">and doing code is not be in the days of immortality!</saying>
+<saying who="rindolf">dazjorz: or eval { ... }</saying>
+<saying who="rindolf">dazjorz: heh.</saying>
+<saying who="rindolf">It&#39;s hard to do code.</saying>
+<saying who="dazjorz">do $model;</saying>
+<saying who="dazjorz">eh.. sorry, do $hotmodel;</saying>
+<saying who="rindolf">&quot;Are you into my brother?&quot;</saying>
+<saying who="rindolf">&quot;No I&#39;m totally into Perl.&quot;</saying>
+<saying who="krang">ah ok, I see. Thanks guys!</saying>
+<saying who="rindolf">krang: yw.</saying>
+<saying who="dazjorz">heh :-)</saying>
+<saying who="rindolf">If you want a configuration file, you should be using something like INI, YAML, etc.</saying>
+<saying who="rindolf">XML perhaps.</saying>
+<saying who="rindolf">Something.</saying>
+<saying who="rindolf">Apache-like config.</saying>
+<saying who="dazjorz">Apache-like is very strong but hard to parse, right ?</saying>
+<saying who="dazjorz">Loading and saving configuration never looks good, especially when it&#39;s XML</saying>
+<saying who="dazjorz">the code to load and save is ugly.</saying>
+</body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Sextalk among Perl cultists</tagline>
+        </info>
+</irc>
+</fortune>
+<fortune id="foolish-inviting-rindolf-to-australia">
+    <meta>
+        <title>f00li5h inviting rindolf to Australia</title>
+    </meta>
+    <irc>
+        <body>
+<saying who="f00li5h">rindolf: are you coming out this way on tour some time?</saying>
+<saying who="rindolf">f00li5h: to .au?</saying>
+<saying who="f00li5h">yes!</saying>
+<saying who="rindolf">f00li5h: don&#39;t think so.</saying>
+<saying who="f00li5h">you can pay some of my rent for a bit ^_^</saying>
+<saying who="rindolf">f00li5h: I&#39;m out of job too.</saying>
+<saying who="f00li5h">perfect timing!</saying>
+<saying who="f00li5h">no commitments</saying>
+<me_is who="f00li5h">is very good at constructing circular arguments due to his skill in constructing circular arguments</me_is>
+        </body>
+        <info>
+            <channel>#perl</channel>
+            <network>Freenode</network>
+            <tagline>Will rindolf come to Australia?</tagline>
+        </info>
+    </irc>
+</fortune>
+<fortune id="sharp-perl-love-life-of-cats">
+    <meta>
+        <title>The Love Life of Cats</title>
+    </meta>
+    <irc>
+        <body>
+<saying who="pkrumins">today my kitty gave a birth to two kitties!</saying>
+<saying who="rindolf">pkrumins: ah, nice.</saying>
+<saying who="pkrumins">one of them died :(</saying>
+<saying who="pkrumins">during birth</saying>
+<saying who="rindolf">pkrumins: oh. :-(</saying>
+<saying who="simcop2387">pkrumins: were you expecting it to happen?</saying>
+<saying who="simcop2387">:(</saying>
+<saying who="pkrumins">simcop2387, i was expecting this week</saying>
+<saying who="rindolf">pkrumins: do you know who the father is?</saying>
+<saying who="simcop2387">ah</saying>
+<saying who="pkrumins">rindolf, some cat</saying>
+<saying who="simcop2387">rindolf: hopefully not him</saying>
+<saying who="pkrumins">rindolf, remember my kitty ran away</saying>
+<saying who="rindolf">pkrumins: ah.</saying>
+<saying who="pkrumins">for a week</sayin