The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

# help test

use strict ;
use warnings ;

use Test::Exception ;
use Test::Warn;
use Test::NoWarnings ;

use Test::More 'no_plan';
use Test::Block qw($Plan);

use Debug::Mixin ; 

SKIP: 
{
local $Plan = {'help' => 1} ;

skip "unimplemented" => $Plan;

# D:M help is available and complete
# generic help commands work
# breakpoint can have a HELP field => display it from debugger?
}

=comment

{
die "name your test block in line below!" ;
local $Plan = {'' => } ;

is(result, expected, "message") ;
dies_ok
	{
	
	} "" ;

lives_ok
	{
	
	} "" ;

like(result, qr//, '') ;

warning_like
	{
	} qr//i, "";

is_deeply
	(
	generated,
	[],
	'expected values'
	) ;

}

=cut