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

use Elastic::Doc;
use Elastic::Model::Types qw(Binary);

#===================================
has 'basic_attr' => (
#===================================
    is  => 'ro',
    isa => Binary,
);

#===================================
has 'options_attr' => (
#===================================
    is         => 'ro',
    type       => 'binary',
    index_name => 'foo',
    store      => 1,
);

#===================================
has 'multi_attr' => (
#===================================
    is    => 'ro',
    isa   => Binary,
    multi => { one => { type => 'string' }, }
);

#===================================
has 'bad_opt_attr' => (
#===================================
    is         => 'ro',
    isa        => Binary,
    omit_norms => 1,
);

1;