in reply to 2Bor^2B, that's a question!

Hi.

Let me explain a little about this site.

It's an on-line community where people post their code, questions and comments. One of the things that make it so useful is that you can search on a topic and find posts from a year or two ago that answer your question.

Your post links to something off-site, thus in a year's time (or sooner) it may have disappeared. This does not add useful information to the site.

Having just visited the link, I see it's a blog entry of some coloured Perl code on a black background -- not very legible. Better would be if you'd posted it here, within code blocks like this: 

#!usr/bin/perl
# "To be or not to be, that's a question!"

open DNA, $AGRV[0] || die "Die!!";
...

[download]
I suggest you read the Site How To before posting again.

Alex / talexb / Toronto

"Groklaw is the open-source mentality applied to legal research" ~ Linus Torvalds

Replies are listed 'Best First'.
Re^2: 2Bor^2B, that's a question!
by ikegami (Patriarch) on Dec 19, 2006 at 17:18 UTC

    open DNA, $AGRV[0] || die "Die!!";
    means
    open DNA, ($AGRV[0] || die "Die!!");
    Are you sure you want that?

[reply]
[d/l]
[select]

      i suppose it would depend on how much you want something to be in $ARGV[0]. I mean if you absolutely require it to be there (and to not be on the list of perl's false things) this is perfectly reasonable (although the error message is not)

      Plus, it's poetry, you can do what you want, and call it art!

      @_=qw; ask f00li5h to appear and remain for a moment of pretend better than a lifetime;;s;;@_[map hex,split'',B204316D8C2A4516DE];;y/05/os/&print;
[reply]
[d/l]
[select]
        Erm, if $ARGV[0] is a false thingy, then the statement resolves to 
        open DNA, die "Die!!";

        [download]

        which is nonsensical, so it's not reasonable (don't ask e.g. Monty Python whether they support my claim ;-)

        --shmem 

        _($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}
[reply]
[d/l]
[select]

In Section Perl Poetry