#!/usr/bin/env perl

use lib '../../lib';
use Log::Report mode => 'VERBOSE';

dispatcher CALLBACK => 'cb', callback => sub { print "CB=$_[3]\n" };

use Log::Report mode => 'DEBUG';

#trace "foobar0";

#warn "#1\n";
try { trace "foobar1" } accept => 'NONE';

#warn "#2\n";
#try { trace "foobar2" } hide => 'ALL';

#warn "#3\n";

