#!perl
use 5.006;
use strict;
plan tests => 1;
BEGIN {
use_ok( 'Debug::CodeBlock' ) || print "Bail out!\n";
}
diag( "Testing Debug::CodeBlock $Debug::CodeBlock::VERSION, Perl $], $^X" );