Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Isn't this the truth?

by atcroft (Monsignor)
on Mar 29, 2004 at 07:56 UTC ( #340536=poem: print w/ replies, xml ) Need Help??

A harsh lesson, so your discression is advised.

#!/usr/bin/perl # # Isn't this the truth? # # Being a slack, not verifying things no strict; no warnings; my $action = 'assume something important'; my $outcome = $action . ' as applied'; # And at the worst possible time # You learn what $outcome =~ s/^((.{3})(.)(.{2})).+/\u$1 made an/; # the $outcome of $outcome =~ s/^((.{3})(.)(.{2}).+)/$1 \U$2\E out of/; # your $action $outcome =~ s/^((.{3})(.)(.{2}).+)/$1 \U$3\E and \U$4\E/; # is... print $outcome, "\n";

Replies are listed 'Best First'.
Re: Isn't this the truth?
by CountZero (Bishop) on Mar 29, 2004 at 18:45 UTC
    It sure is!

    Really, this should be in a category all of its own: Obfuscated Poetry.

    CountZero

    "If you have four groups working on a compiler, you'll get a 4-pass compiler." - Conway's Law

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: poem [id://340536]
Approved by Limbic~Region
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (13)
As of 2016-06-28 13:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My preferred method of making French fries (chips) is in a ...











    Results (359 votes). Check out past polls.