http://www.perlmonks.org?node_id=575886


in reply to Re^4: Regex Or Die! (!unless)
in thread Regex Or Die!

use Acme::don't; 
don't { print "This won't be printed\n" };    # NO-OP

[download]
How about the TheDamian writes another one ;-) 
use Acme::not_do;
not_do {  print "This won't be printed\n" };    # NO-OP

[download]

Replies are listed 'Best First'.
Re^6: Regex Or Die! (!unless)
by BrowserUk (Patriarch) on Oct 02, 2006 at 14:40 UTC

    What a wonderful idea! I can add to my huge tally of cpan modules by uploading Acme::Ifn't.

    Then we can all become PBP complient and never use unless again. 

    die "'eh up lad! Summat's wrong." ifn't $It'sAlright;

    [download]
    Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
    Lingua non convalesco, consenesco et abolesco. -- Rule 1 has a caveat! -- Who broke the cabal?
    "Science is about questioning the status quo. Questioning authority".
    In the absence of evidence, opinion is indistinguishable from prejudice.
[reply]
[d/l]

In Section Seekers of Perl Wisdom