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

use strict ;
use warnings ;

use Test::Exception ;
use Test::Warn;
use Test::NoWarnings qw(had_no_warnings);

use Test::More 'no_plan';
#use Test::UniqueTestNames ;

use Test::Block qw($Plan);

use {{$FULL_MODULE_NAME}}  ;

{
local $Plan = {'' => 1} ;


throws_ok
	{
	}
	qr//, 'failed' ;
}