Type::Tiny::Manual::NonOO - Online Linux Manual Page

Section : 3pm
Updated : 2021-02-24
Source : perl v5.32.1
Note : User Contributed Perl Documentation

NAME

Type::Tiny::Manual::NonOO − Type::Tiny in non−object−oriented code

MANUAL

Although Type::Tiny was designed with object-oriented programming in mind, especially Moose-style classes and roles, it can be used in procedural and imperative programming.

If you have read Type::Tiny::Manual::UsingWithMoo, you should understand how Type::Params can be used to validate method parametters. This same technique can be applied to regular subs too; just don't shift

off

$self

. More information about checking parameters can be found in Type::Tiny::Manual::Params.

The is_*

and

assert_*

functions exported by type libraries may be useful in non-OO code too. See Type::Tiny::Manual::UsingWithMoo3.

Type::Tiny and Smart Match

Perl 5.10 introduced the smart match operator ~~

, which has since been deprecated because though the general idea is fairly sound, the details were a bit messy.

Nevertheless, Type::Tiny has support for smart match and I'm documenting it here because there's nowhere better to put it.

The following can be used as to check if a value passes a type constraint:

​  $value ~~ SomeType

Where it gets weird is if $value

is an object and overloads

~~

. Which overload of

~~

wins? I don't know.

Better to use:

​  SomeType−>check( $value )   # more reliable, probably faster
​  is_SomeType($value)         # more reliable, definitely faster

It's also possible to do:

​  $value ~~ SomeType−>coercion

This checks to see if $value

matches any type that can be coerced to

SomeType

But better to use:

​  SomeType−>coercion−>has_coercion_for_value( $value )

given

and

when

Related to the smart match operator is the given

when

syntax.

This will not do what you want it to do:

​  use Types::Standard qw( Str Int );
​  
​  given ($value) {
​    when (Int) { ... }
​    when (Str) { ... }
​  }

This will do what you wanted:

​  use Types::Standard qw( is_Str is_Int );
​  
​  given ($value) {
​    when (\&is_Int) { ... }
​    when (\&is_Str) { ... }
​  }

Sorry, that's just how Perl be.

Better though:

​  use Types::Standard qw( Str Int );
​  use Type::Utils qw( match_on_type );
​  
​  match_on_type $value => (
​    Str, sub { ... },
​    Int, sub { ... },
​  );

If this is part of a loop or other frequently called bit of code, you can compile the checks once and use them many times:

​  use Types::Standard qw( Str Int );
​  use Type::Utils qw( compile_match_on_type );
​  
​  my $dispatch_table = compile_match_on_type(
​    Str, sub { ... },
​    Int, sub { ... },
​  );
​  
​  $dispatch_table−>($_) for @lots_of_values;

As with most things in Type::Tiny, those coderefs can be replaced by strings of Perl code.

NEXT STEPS

Here's your next step:

• Type::Tiny::Manual::Optimization Squeeze the most out of your CPU.

AUTHOR

Toby Inkster <tobyink@cpan.org>.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.

DISCLAIMER OF WARRANTIES

THIS PACKAGE IS PROVIDED ‟AS IS” AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.

Johanes Gumabo

Data Size : 13,511 byte

man-Type::Tiny::Manual::NonOO.3pmBuild :

2025-03-22, 13:26

Visitor Screen :

Visitor Counter ( page / site )

2 / 1,208,805

Visitor ID :

Visitor IP :

18.116.19.246

Visitor Provider :

AMAZON-02

Provider Position ( lat x lon )

39.962500

-83.006100

Provider Accuracy Radius ( km )

1000

Provider City :

Columbus

Provider Province :

Ohio

Provider Country :

United States

Provider Continent :

North America

Visitor Recorder : Version :

Visitor Recorder : Library :

Online Linux Manual Page : Version :

Online Linux Manual Page - Fedora.40 - march=x86-64 - mtune=generic - 25.03.22

Online Linux Manual Page : Library :

lib_c - 24.10.03 - march=x86-64 - mtune=generic - Fedora.40

Online Linux Manual Page : Library :

lib_m - 24.10.03 - march=x86-64 - mtune=generic - Fedora.40

Data Base : Version :

Online Linux Manual Page Database - 24.04.13 - march=x86-64 - mtune=generic - fedora-38

Data Base : Library :

lib_c - 23.02.07 - march=x86-64 - mtune=generic - fedora.36

Very long time ago, I have the best tutor, Wenzel Svojanovsky. If someone knows the email address of Wenzel Svojanovsky, please send an email to johanesgumabo@gmail.com.

Help me, linux0001.com will expire on July 16, 2025. I have no money to renew it. View detail

If error, please print screen and send to johanes_gumabo@yahoo.co.id
Under development. Support me via PayPal.

ERROR :

Need New Coding

(parse_manual_page_|254|Type::Tiny::Manual::NonOO.3pm|36/37|el══─{─══.|.el══─{─══. ds -- \|\(em\| ) (htmlprn|160|Type::Tiny::Manual::NonOO.3pm|36/37|.el══─{─══. ds -- — |.el══─{─══. ds -- \|\(em\| ) (parse_manual_page_|254|Type::Tiny::Manual::NonOO.3pm|43|br══─}─══|'br══─}─══ ) (htmlprn|160|Type::Tiny::Manual::NonOO.3pm|43|'br══─}─══ |'br══─}─══ )