package Data::MultiValued::AttributeTrait::TagsAndRanges; use Moose::Role; use Data::MultiValued::TagsAndRanges; with 'Data::MultiValued::AttributeTrait'; sub multivalue_storage_class { 'Data::MultiValued::TagsAndRanges' }; sub opts_to_pass_set { qw(from to tag) } sub opts_to_pass_get { qw(at tag) } package Moose::Meta::Attribute::Custom::Trait::MultiValued::TagsAndRanges;{ sub register_implementation { 'Data::MultiValued::AttributeTrait::TagsAndRanges' } } 1;