Test::More::diag()

[Michael G Schwern]

Its been on the Test::More todo list to have a blessed way to do:

    print STDOUT "# here's some extra info\n";

I'm planning on using diag().

    ok( $foo == $bar ) || diag 'blah blah';

it has nice mnemonics with:

    open(FOO, "bar") || die 'blah blah';

"ok or diag" "open or die"

Thoughts?

-- 

Michael G. Schwern   <[EMAIL PROTECTED]>    http://www.pobox.com/~schwern/
Perl Quality Assurance      <[EMAIL PROTECTED]>         Kwalitee Is Job One
<mendel>         ScHWeRnsChweRN    sChWErN   SchweRN  SCHWErNSChwERnsCHwERN    
  sChWErn  ScHWeRn      schweRn           sCHWErN           schWeRn    scHWeRN 
   SchWeRN      scHWErn SchwErn       scHWErn       ScHweRN       sChwern      
scHWerN        scHWeRn           scHWerN        ScHwerN       SChWeRN scHWeRn  
        SchwERNschwERn        SCHwern  sCHWErN   SCHWErN           sChWeRn