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

Confession Booth

by crazyinsomniac (Prior)
on Sep 05, 2001 at 10:35 UTC ( #110224=perlmeditation: print w/replies, xml ) Need Help??


Welcome to the Confession Booth

Please confess your sins here, whatever they may be.
This is a confession booth. It is not a place to whine, but confess!!

Disclaimer: Don't blame. It came from inside the void

perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;"

Replies are listed 'Best First'.
Re: Confession Booth
by blakem (Monsignor) on Sep 05, 2001 at 11:41 UTC
    OK, I'll step up to the plate...

    Last week, in Reg Expression Question I was a bit rough on a newbie. The question was basically "How to I determine if X is a member of set Y?" (with an attempted solution using a regex) A bunch of us jumped on the question right after it was posted, in our haste azatoth posted an incorrect answer. Not a big deal, azatoths been around and can take it when several of us pointed out the mistake. However this set the stage for my mood in a later posting.....

    Two good solutions were proposed, 1.) grep an array made from the set, or 2.) check for a hash key in a hash made from the set. A regex is ill suited for this task, which I thought this had been communicated in the thread. However, two hours later, a newbie pix used his second post ever to suggest using a regex. It happens to contain an overlooked 'gotcha' lurking within. I felt that anyone who read the previous posts should be able to conclude that regexes were not the way to go, so I shot down the suggestion with a bit more gusto than I should have. (I toned the node down significantly after the fact)

    I hadn't realized that I was roasting someone's second post, and some of the mistakes earlier in the thread had been edited so it didn't read quite like I assumed it did. I'm concerned that my grumbling might have made pix a bit gunshy......

    Anyway, pix if you're out there, sorry I roasted your second post. It actually was a rather clever way to address the problem, swapping the data and regex around. While I wouldn't recommend this technique over the others, it did have a "coolness" factor to it that I totally overlooked before. I didn't mean to blast a newbie, and was more harsh than necessary.


Re: Confession Booth
by azatoth (Curate) on Sep 05, 2001 at 10:40 UTC

    Forgive me, Father, for I have sinned.

    Twice last week, I removed the -w switch from some code, because I was too lazy to check a bug in a module.

    Once the week before last, I submitted to the temptation of cutting and pasting some PerlMonks code into a script, without checking it for security holes / bugs.

    Three days ago I bought the Owl book, but have since failed to read a single page, despite promises to fellow monks.

    Forgive me, Father, for I have sinned.

    Azatoth a.k.a Captain Whiplash

    Make Your Die Messages Full of Wisdom!
    Get YOUR PerlMonks Stagename here!
    Want to speak like a Londoner?
Re: Confession Booth
by idnopheq (Chaplain) on Sep 05, 2001 at 15:17 UTC
    Forgive me, Father, for I have sinned.

    Yesterday, I edited some code with M$ Notepad. Twice.
    I wrote a huge if - elsif - else structure insted of a more simple switch statement.
    I have yet to Shift, Pop, Unshift and Push with Impunity!.
    I was temped by the XP whore.

    Apply yourself to new problems without preparation, develop confidence in your ability to to meet situations as they arrise.

Re: Confession Booth
by claree0 (Hermit) on Sep 05, 2001 at 11:41 UTC

    Forgive me

    I have put off learning the full power of regexes for too long, and now I feel I need to go back and rewrite lots of code

    I have only now ordered the owl book, and wish forgiveness for my wasted months of effort.

Re: Confession Booth
by stefan k (Curate) on Sep 05, 2001 at 11:56 UTC
    Forgive me

    I have sinned and I am still doing it now: I chose Ruby for my current project. I have sunken so deep that I even link to the language's website in this post.

    Regards... Stefan
    you begin bashing the string with a +42 regexp of confusion

Re: Confession Booth
by Tiefling (Monk) on Sep 05, 2001 at 15:31 UTC
    Bless me Father, for I have sinned.

    It is two months since my last Perl. I have allowed myself to be seduced by the earthly wiles of Role-Playing conventions and working for the Government.

    I promise to do better in future, and resist the lure of the world, the flesh and Micro$oft.

    The Penitent Tiefling

    -----BEGIN GEEK CODE BLOCK----- Version: 3.1 GAT d++ s:- a-- C++ UL P++ L++(+) E? W+(++) N+ o? K w+(--) !O M- V? PS+ PE- Y PGP- t+ 5 X+ R+++ tv- b+++ DI++++ D+ G+ e++ h!(-) y +? ------END GEEK CODE BLOCK------
Re: Confession Booth
by mexnix (Pilgrim) on Sep 05, 2001 at 18:54 UTC
    Forgive me Father, for I have sinned:

    I have wrote many a CGI program with out using (-T) taint checking. Please do not let your wrath fall upon me as I have not heeded to the advice of other monks and have read Ovid's Tutorial many times.

    Also, I have been tempted by C++ (and even Java) in the spirit of marketability.

    May Perl be with me always.


    s mmgfbs nf, nfyojy m,tr yb-zya-zy,s zfzphz,print;
    - thanks japhy :)

Re: Confession Booth
by MZSanford (Curate) on Sep 05, 2001 at 19:31 UTC
    I, unlike the infidels, use Carp; when i confess !
    main::typing called at (eval 25)[] line 2 main::lurking called at (eval 26)[] line 2 main::monestray_login called at (eval 27)[] line 2 main::logon_to('Network') called at (eval 28)[] line 2 main::get_to_work called at (eval 29)[] line 2 main::drive called at (eval 30)[] line 2 main::wake_up called at (eval 33)[] line 2
    can't sleep clowns will eat me
    -- MZSanford
(jeffa) Re: Confession Booth
by jeffa (Bishop) on Sep 06, 2001 at 01:39 UTC
    Forgive me, within the past month i have joined another support group, and i have cheated on my beloved Perl by toying in the dark arts of Python.

    And Zope.


    Well he made me!


        A flute with no holes is not a flute . . .
    a doughnut with no holes is a danish.
                                    - Basho,
                                      famous philosopher
Re: Confession Booth
by TStanley (Canon) on Sep 06, 2001 at 02:04 UTC
    Forgive me Father for I have sinned:

    1. I removed use strict; and -T from scripts to make them not produce errors
    2. I haven't read the perldoc for CGI enough and it has been far to long since I visited Ovid's CGI tutorial

    There's an infinite number of monkeys outside who want to talk to us
    about this script for Hamlet they've worked out
    -- Douglas Adams/Hitchhiker's Guide to the Galaxy
      Even worse:

      I have run CGI scripts as setgid, and bypassed taint checking (which is automatically turned on for setuid/setgid programs; see perlman:perlsec) by invoking perl as perl -U (see perlman:perlrun).

      But that was a very long time ago, and I've already wept enough tears about that program...


Re: Confession Booth
by Anonymous Monk on Sep 06, 2001 at 01:44 UTC
    $father->forgive($me, reason => "I have sinned")

    I used to post anonymously when I expect to be downvoted for a node so as not to take the XP hit (I don't do it very much any more, I usually don't post the node at all)

    Once I made a node (not anonymously) that I later realized was really stupid, and I edited it to try to cover the whole thing up and hoped nobody would remember.

    I don't always put use strict; and -w in my code if I'm not showing it to anybody else.

    I learned how to program in C.

Re: Confession Booth
by dru145 (Friar) on Sep 15, 2001 at 12:10 UTC
    Forgive me Father, for I have sinned:

    When first learning perl, I purchased "Perl for Dummies" and tried to read it after getting frustrated with the Llma.

    Please don't hold it against me

Re: Confession Booth
by Anonymous Monk on Sep 09, 2005 at 05:52 UTC
    After many years of preaching the holy language with enthusiasm, I've fallen into darkness and actually considered learning python. I realized my sin while reading the "Beginner's Guide to python", and shut down the web browser immediately. I could not be more ashamed.
Re: Confession Booth
by Anonymous Monk on Sep 06, 2001 at 01:48 UTC

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlmeditation [id://110224]
Approved by root
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (8)
As of 2016-10-26 09:20 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (338 votes). Check out past polls.