view release on metacpan or  search on metacpan

lib/Salvation/TC/Utils.pm  view on Meta::CPAN

    Salvation::TC -> setup_type( $name => (
        validator => $params{ 'validator' } -> ( $name ),
        parent => $params{ 'parent' },
    ) );
}

=head2 as( Str $type )

=cut

sub as( $ ) { ## no critic (ProhibitSubroutinePrototypes)

    my ( $type ) = @_;

    return ( parent => Salvation::TC -> get( $type ) );
}

=head2 enum( Str $name, ArrayRef[Str] $values )

Хэлпер для создания enum'ов значений типа C<Str>. Пример использования: