http://www.perlmonks.org?node_id=1027611


in reply to Re^2: check parameters
in thread check parameters

Untested:

if (!grep { /^${\ (join '|', @{$opts->{params}}) }/i } keys %$format)
package Cow { use Moo; has name => (is => 'lazy', default => sub { 'Mooington' }) } say Cow->new->name