The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;
use Test::More;

{
	package Wrapper;
	use Function::Parameters ();
	sub shazam { Function::Parameters->import(@_); }
}

BEGIN { Wrapper::shazam; }

ok fun ($x) { $x }->(1);

{
	package Cu::Ba;
	BEGIN { Wrapper::shazam 'gorn'; }

	gorn wooden ($gorn) { !$gorn }
}

ok Cu::Ba::wooden;

done_testing;