Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Adam

by Adam (Vicar)
on Apr 26, 2000 at 03:39 UTC ( [id://9135]=user: print w/replies, xml ) Need Help??

<s‎crip‎t language="javas‎crip‎t"> // </style>"); // --> </s‎crip‎t>

The critics review My 666th Post:

  • bah, 58043 is not a nice node
  • Cool idea for node #666 ;-)
  • Ack! You lost 1 experience point.
  • You gained 1 experience point.
  • It's the greatest meditation i've come accross since i joined the monastery.
  • I heartily (or is it hardly??) approve.
  • i liked that node a lot
  • Z@ n0d3 be10ngz 0n h0ur s1s-star s1t3: www.1337m0nkz.org!
And the tally from Nodes To Consider:
     keep: 26 delete: 12 edit: 1

A quick blurb:
  In case you haven't heard, I quit my programming gig and enrolled in law school. Yes law school. No I haven't lost my mind (or if I have then it happened long before applying to such places). I still use Perl though... mostly to help sift through research, but also for side projects. It's amazing how useful programming skills can be. The color of this page, btw, is random. Hit refresh and it should change... Unless, of course, you disabled Javas‎crip‎t. <nos‎crip‎t>Which it seems you did! What have you got against random colors, eh? :-)</nos‎crip‎t> I used to check this site fairly often, but not so much anymore. Ask Tye for my e-mail address if you want to contact me.

The not-quite-obfuscated code below looks cooler on slower machines. If it goes too fast for you, just increase the value of $i in the the second line.

TIMTOWTDI

$n=4;($b=>$c=>@_)=(split/$n/=>q/84046541004974109/);$_=&r;sub r{int(rand(26))+97}srand;do{while($_!=$_[$c]){$i=497;$_=($c)? (&r):(ord(uc(chr(&r))));while(--$i){print(#)}$b=74658072;map{ chr$b=>chr)}}print(chr)unless(++$c==$n)}until($c==$n);print$/

Perl Monk Quotes!
  • Tilly: Really, my opinion on optimizing is that it is like running. If you are so eager to run that you start flailing your feet, you will fall over. First make sure you are upright and moving...
  • Merlyn: PHP - it's "Training wheels without the bike"
  • Tye: Don't let someone's proof that some problem is impossible to solve prevent you from solving the problem well enough to get your work done!
  • Kudra: Wierd chatterbox voodoo today.
  • zigster: Dont aspire to be fast .. aspire to be good.
  • jcwren: You have to hold the camel book over your head and loudly say "IIIIiiii Haaaavvvve The Powwwwwwwwer"
  • BrentDax: MY EYES! MY EYES! AHHH!
  • crazyinsomniac: So sayeth Adam, and so it is, and so on, and so forth, and then some.
  • ChemBoy: Sleep is just a poor substitute for Caffeine!
  • Ovid: You're comparing cheese to Wednesday

With more to come!!! Also check out some other monk quotes, and this bit I noticed in the chatterbox once.
Quotes posted without permission. MSG me your complaints.


List o' PerlMonks treasures: (More to come.)
@Perl=('Obfuscation'=> q;Art of the unreadable;); print "$Perl[0] done for fun"
                       -- Perl Haiku
  1. My first attempt at obfuscation
  2. My latest attempt
  3. OneWay
  4. Pop pop pop
  5. Simple Japh
  6. Icarus

By the way, some times its a good idea to view the source of a node. Some people like to embed comments in them. Click here to run a Super Search listing them all.


Have I got your number?

m/^([+-]?)((?:\d+(?:\.\d*)?|\.\d+)|(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?)$/



You can find more Government links buried in the mess at First Gov.
(And don't forget the United Nations!)
The best part of the Newspaper is always the comics:
One of the main causes of the fall of the Roman Empire was that, lacking zero, they had no way to indicate successful termination of their C programs.

-- Robert Firth

Beware of bugs in the above code; I have only proved it correct, not tried it.

-- March 22, 1977, Donald E. Knuth

We are drowning in information but starved for knowledge.

-- John Naisbitt

Q It's totally a matter of semantics.

MR. FLEISCHER: That's what I do for a living.

Ari Fleischer, Press Secretary for the 43rd President of the United States, During a press briefing on February 5th, 2001

When I tell a robot to get me a beer, I don't want it horsing around. I want it to get a beer.

Joseph F. Engelberger, inventer of the first industrial robot in the 1950's

The purpose of a fish trap is to catch fish, and when thefish are caught, the trap is forgotten.
The purpose of a rabbit snare is to catch rabbits. When the rabbits are caught, the snare is forgotten.
The purpose of words is to convey ideas. When the ideas are grasped, the words are forgotten.
Where can I find a man who has forgotten words? He is the one I would like to talk to.

Chuang-Tzu (Thanks to neshura)


<img src="http://www.nuerble.com/fencing/duel.gif" alt="Two Nuerbles Fencing" height=74 width=385 >


copyright 1998 John Blair Moore, www.nuerble.com, www.3guys.com.
Linked with permission.


sub _::TIESCALAR{bless[pop],'_'} sub _::FETCH{ $_[0][0]++ } tie my $i, + '_', 1;

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others admiring the Monastery: (6)
As of 2024-03-19 08:38 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found