subtype 'MyMatch',
      as 'Str',
      where { /$regEx/ },
      message { "$_ didn't match" };

has 'attr' => (
    is => 'ro',
    isa => 'Maybe[MyMatch]',
    required => 0
);