Select Code to Download

use Test::More tests => 2;

...
    is(1, 1, 'Test: 1 == 1');
    isnt(1, 0, 'Test: 1 != 0');
}

$ export PM_1194120_DEBUG=0
$ prove -v pm_1194120.t
...
Result: PASS
$ prove pm_1194120.t > /dev/null
$

$ export PM_1194120_DEBUG=1
$ prove -v pm_1194120.t
...
# Debug statement #1 (1 == 1): TRUE
# Debug statement #2 (1 == 0): FALSE
$