Slash Boxes
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

use Perl Log In

Log In

[ Create a new account ]

da (1525)

  (email not shown publicly)
AOL IM: daatcoderdotcom (Add Buddy, Send Message)
Public Calendar: Subscribe, Download

Linux and perl guy working for the Computer Science department [] at the University of Waterloo []. For resume check here [].

Journal of da (1525)

Monday September 19, 2005
09:35 AM

The Leaves of Dianetics Personality Test

[ #26778 ]
So, last Friday when I was chatting with friends on IRC, one silly thought led to another, which I just brought to an obvious (?) conclusion, The Leaves of Dianetics Personality Test , a mashup Markov Chain program featuring Walt and L. Ron, together (hopefully) for the first time.

Some sample output:

Do you consider that you read? When recounting some amusing incident can you easily pleased?

When met with direct opposition would you really take the trouble to see the soul? See, your own inferiority?

Do people enjoy being in your demands on your past illnesses or painful experiences? Do you consider the best points of most people and only rarely speak slightingly of them? Do you have little regret on past misfortunes and failures? Does the youth of today have more opportunity than that of a poem nor the least part of a greater religion, The following chants each for its kind I sing. My comrade! For you to 'own up and take the trouble to see your side, and thus agree with you? Do you openly and sincerely admire beauty in other people? Do you sometimes completely unable to enter the spirit of things? Do you consider the good old cause, the great masters, Now if eligible O that the speaker is referring entirely to you?

The code is a Markov chain program by Dave Smith.

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
More | Login | Reply
Loading... please wait.
  • That's one of the better uses I've seen that old script (which dates back to my first year with Perl) put to.