Using with Data::Sah
To check data against this schema (requires Data::Sah):
use Data::Sah qw(gen_validator);
my \$validator = gen_validator("$sch_name*");
say \$validator->(\$data) ? "valid" : "INVALID!";
# Data::Sah can also create validator that returns nice error message string
# and/or coerced value. Data::Sah can even create validator that targets other
# language, like JavaScript. All from the same schema. See its documentation
# for more details.
Using with Params::Sah
To validate function parameters against this schema (requires Params::Sah):
use Params::Sah qw(gen_validator);
sub myfunc {
my \@args = \@_;
state \$validator = gen_validator("$sch_name*");
\$validator->(\\\@args);
...
}
Using with Perinci::CmdLine::Lite
To specify schema in Rinci function metadata and use the metadata with Perinci::CmdLine (Perinci::CmdLine::Lite) to create a CLI:
# in lib/MyApp.pm
package
MyApp;
our \%SPEC;
\$SPEC{myfunc} = {
v => 1.1,
summary => 'Routine to do blah ...',
args => {
arg1 => {
summary => 'The blah blah argument',
schema => ['$sch_name*'],
},
...
},
};
sub myfunc {
my \%args = \@_;
...
}
1;
# in myapp.pl
package
main;
use Perinci::CmdLine::Any;
Perinci::CmdLine::Any->new(url=>'/MyApp/myfunc')->run;
# in command-line
% ./myapp.pl --help
myapp - Routine to do blah ...
...
% ./myapp.pl --version
% ./myapp.pl --arg1 ...
_ }
$self->add_text_to_section(
$document, join("", @pod), 'SYNOPSIS',
{ignore => 1},
);
}
# add POD section: DESCRIPTION
{
last unless $sch->[1]{description};
require Markdown::To::POD;
my @pod;
push @pod, Markdown::To::POD::markdown_to_pod(
$sch->[1]{description}), "\n\n";
$self->add_text_to_section(
$document, join("", @pod), 'DESCRIPTION',
{ignore => 1},
);
}
$self->log(["Generated POD for '%s'", $filename]);
} # Sah::Schema::*
}
}
1; # ABSTRACT: Plugin to use when building Sah::Schemas::* distribution
__END__
NAME
Pod::Weaver::Plugin::Sah::Schemas - Plugin to use when building Sah::Schemas::* distribution
VERSION
This document describes version 0.068 of Pod::Weaver::Plugin::Sah::Schemas (from Perl distribution Pod-Weaver-Plugin-Sah-Schemas), released on 2021-08-04.
SYNOPSIS
In your weaver.ini:
[-Sah::Schemas]
DESCRIPTION
This plugin is used when building a Sah::Schemas::* distribution. It currently does the following to lib/Sah/Schemas/* .pm files:
Create "SAH SCHEMAS" POD section from list of Sah::Schema::* modules in the distribution
Mention some modules in See Also section
It does the following to "Sah/Schema/*" in lib .pm files:
Add "DESCRIPTION" POD section schema's description
CONTRIBUTOR
Steven Haryanto <sharyanto@cpan.org>
HOMEPAGE
Please visit the project's homepage at https://metacpan.org/release/Pod-Weaver-Plugin-Sah-Schemas.
SOURCE
Source repository is at https://github.com/perlancar/perl-Pod-Weaver-Plugin-Sah-Schemas.
BUGS
Please report any bugs or feature requests on the bugtracker website https://rt.cpan.org/Public/Dist/Display.html?Name=Pod-Weaver-Plugin-Sah-Schemas
When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature.
SEE ALSO
Dist::Zilla::Plugin::Sah::Schemas
AUTHOR
perlancar <perlancar@cpan.org>
COPYRIGHT AND LICENSE
This software is copyright (c) 2021, 2020, 2019, 2016 by perlancar@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.