NAME
Sah::Schemas::Perl - Sah schemas related to Perl
VERSION
This document describes version 0.049 of Sah::Schemas::Perl (from Perl
distribution Sah-Schemas-Perl), released on 2023-10-26.
SAH SCHEMAS
The following schemas are included in this distribution:
* perl::distname
Perl distribution name, e.g. Foo-Bar.
This is a schema you can use when you want to accept a Perl
distribution name, e.g. "WWW-Mechanize". It offers basic checking of
syntax as well as a couple of conveniences. First, it offers
completion from list of locally installed Perl distribution. Second,
it contains coercion rule so you can also input "Foo::Bar",
"Foo/Bar", "Foo/Bar.pm", or even 'Foo.Bar' and it will be normalized
into "Foo-Bar".
To see this schema in action on the CLI, you can try e.g. the
"dist-has-deb" script from App::DistUtils and activate its tab
completion (see its manpage for more details). Then on the CLI try
typing:
% dist-has-deb WWW-<tab>
% dist-has-deb dzp/<tab>
Note that this schema does not check that the Perl disribution
exists on CPAN or is installed locally. To check that, use the
"perl::distname::installed" schema. And there's also a
"perl::distname::not_installed" schema.
* perl::distname::default_this_dist
Perl distribution name, defaults to "this distribution".
See App::ThisDist's this_dist() for more details on how "this
distribution" is determined. Note that "App::ThisDist" is not added
as dependency automatically; you will have to add it manually.
Note: be careful when using this schema for actions that are
destructive to a Perl dist or that change some things, because a
user can perform those actions without giving an argument (e.g. a
"delete-dist" script). It is safer to use this schema to perform a
non=destructive action (e.g. "ls-dist") and/or operate in dry-run
mode by default.
* perl::distname_with_optional_ver
Perl distribution name (e.g. Foo-Bar) with optional version number
suffix (e.g. Foo-Bar@0.001).
For convenience (particularly in CLI with tab completion), you can
input one of:
Foo::Bar
Foo/Bar
Foo/Bar.pm
Foo.Bar
and it will be coerced into Foo-Bar form.
* perl::distname_with_ver
Perl distribution name with version number suffix, e.g.
Foo-Bar@0.001.
For convenience (particularly in CLI with tab completion), you can
input one of:
Foo::Bar@1.23
Foo/Bar@1.23
Foo/Bar.pm@1.23
Foo.Bar@1.23
and it will be coerced into Foo-Bar form.
* perl::filename
Filename of Perl script/module/POD, e.g. /path/Foo/Bar.pm.
Use this schema if you want to accept a filesystem path containing
Perl script, module, or POD. The value of this schema is in the
convenience of CLI completion, as well as coercion from script or
module name.
String containing filename of a Perl script or module or POD. For
convenience, when value is in the form of:
Foo
Foo.pm
Foo.pod
Foo::Bar
Foo/Bar
Foo/Bar.pm
Foo/Bar.pod
and a matching .pod or .pm file is found in @INC, then it will be
coerced (converted) into the path of that .pod/.pm file, e.g.:
/home/ujang/perl5/perlbrew/perls/perl-5.24.0/lib/site_perl/5.24.0/Foo/Bar.pm
lib/Foo/Bar.pod
To prevent such coercion, you can use prefixing path, e.g.:
./Foo::Bar
../Foo/Bar
/path/to/Foo/Bar
This schema comes with convenience completion too.
* perl::funcname
Perl function name, either qualified with package name (e.g.
Foo::subname) or unqualified (e.g. subname).
Currently function name is restricted to this regex:
\A[A-Za-z_][A-Za-z_0-9]*\z
Function name can be qualified (prefixed) by a package name, which
is restricted to this regex:
[A-Za-z_][A-Za-z_0-9]*(::[A-Za-z_0-9]+)*
* perl::identifier::qualified_ascii
Qualified identifier in Perl, without "use utf8" in effect.
* perl::identifier::qualified_unicode
Unqualified identifier in Perl, with "use utf8" in effect.
* perl::identifier::unqualified_ascii
Unqualified identifier in Perl, without "use utf8" in effect.
* perl::identifier::unqualified_unicode
Unqualified identifier in Perl, with "use utf8" in effect.
* perl::modargs
Shorter alias for perl::modname_with_optional_args.
* perl::modname
Perl module name, e.g. Foo::Bar.
This is a schema you can use when you want to accept a Perl module
name. It offers basic checking of syntax as well as a couple of
conveniences. First, it offers completion from list of locally
installed Perl modules. Second, it contains coercion rule so you can
also input "Foo-Bar", "Foo/Bar", "Foo/Bar.pm" or even 'Foo.Bar' and
it will be normalized into "Foo::Bar".
To see this schema in action on the CLI, you can try e.g. the
"pmless" script from App::PMUtils and activate its tab completion
(see its manpage for more details). Then on the CLI try typing:
% pmless M/<tab>
% pmless dzp/<tab>
% pmless Module/List/Wildcard
% pmless Module::List::Wildcard
Note that this schema does not check that the Perl module exists or
is installed locally. To check that, use the
"perl::modname::installed" schema. And there's also a
"perl::modname::not_installed" schema.
* perl::modname::default_this_mod
Perl module, defaults to "this module".
See App::ThisDist's this_mod() for more details on how "this module"
is determined. Note that "App::ThisDist" is not added as dependency
automatically; you will have to add it manually.
Note: be careful when using this schema for actions that are
destructive to a Perl module or that change some things, because a
user can perform those actions without giving an argument (e.g. a
"delete-module" script). It is safer to use this schema to perform a
non=destructive action (e.g. "man-module") and/or operate in dry-run
mode by default.
* perl::modname::installed
Name of a Perl module that is installed locally.
This schema is based on the "perl::modname" schema with an
additional check that the perl module is installed locally. Checking
is done using Module::Installed::Tiny. This check fetches the source
code of the module from filesystem or %INC hooks, but does not
actually load/execute the code.
* perl::modname::not_installed
Name of a Perl module that is not installed locally.
This schema is based on the "perl::modname" schema with an
additional check that the perl module is not installed locally.
Checking is done using Module::Installed::Tiny. This check fetches
the source code of the module from filesystem or %INC hooks, but
does not actually load/execute the code.
* perl::modname_or_prefix
Perl module name (e.g. Foo::Bar) or prefix (e.g. Foo::Bar::).
Contains coercion rule so inputing "Foo-Bar" or "Foo/Bar" will be
normalized to "Foo::Bar" while inputing "Foo-Bar-" or "Foo/Bar/"
will be normalized to "Foo::Bar::"
See also: "perl::modname" and "perl::modprefix".
* perl::modname_pm
Perl module name in Foo/Bar.pm form.
This is just like the "perl::modname" schema except that instead of
to "Foo::Bar", it normalizes to "Foo/Bar.pm".
* perl::modname_with_optional_args
Perl module name (e.g. Foo::Bar) with optional arguments (e.g.
Foo::Bar=arg1,arg2).
Perl module name with optional arguments which will be used as
import arguments, just like the "-MMODULE=ARGS" shortcut that "perl"
provides. Examples:
Foo
Foo::Bar
Foo::Bar=arg1,arg2
See also: "perl::modname". A two-element array from (coercible from
JSON string) is also allowed:
["Foo::Bar", \@args]
* perl::modname_with_optional_ver
Perl module name (e.g. Foo::Bar) with optional version number suffix
(e.g. Foo::Bar@0.001).
* perl::modname_with_ver
Perl module name with version number suffix, e.g. Foo::Bar@0.001.
* perl::modnames
Array of Perl module names, e.g. ["Foo::Bar", "Baz"].
Array of Perl module names, where each element is of "perl::modname"
schema, e.g. "Foo", "Foo::Bar".
Contains coercion rule that expands wildcard, so you can specify:
Module::P*
and it will be expanded to e.g.:
["Module::Patch", "Module::Path", "Module::Pluggable"]
The wildcard syntax supports jokers ("?", "*", "**"), brackets
("[abc]"), and braces ("{one,two}"). See Module::List::Wildcard for
more details.
* perl::modprefix
Perl module prefix, e.g. Foo::Bar::.
Perl module prefix, e.g. "Foo::Bar::". An empty prefix ('') is also
allowed.
Contains coercion rule so you can also input:
Foo-Bar
Foo-Bar-
Foo-Bar
Foo/Bar
Foo/Bar/
Foo::Bar
and it will be normalized into "Foo::Bar::".
* perl::modprefixes
Perl module prefixes, e.g. ["", "Foo::", "Foo::Bar::"].
Array of Perl module prefixes, where each element is of
"perl::modprefix" schema, e.g. "Foo::", "Foo::Bar::".
Contains coercion rule that expands wildcard, so you can specify:
Module::C*
and it will be expanded to e.g.:
["Module::CPANTS::", "Module::CPANfile::", "Module::CheckVersion::", "Module::CoreList::"]
The wildcard syntax supports jokers ("?", '*") and brackets
("[abc]"). See the "unix` type of wildcard in Regexp::Wildcards,
which this coercion rule uses.
* perl::module::release::version
Expression to select module release.
* perl::module::release::versions
* perl::pm_filename
A .pm filename, e.g. /path/Foo.pm.
Use this schema if you want to accept a filesystem path containing
Perl module. The value of this schema is in the convenience of CLI
completion, as well as coercion from module name.
String containing filename of a Perl module. For convenience, when
value is in the form of:
Foo
Foo.pm
Foo::Bar
Foo/Bar
Foo/Bar.pm
and a matching .pm file is found in @INC, then it will be coerced
(converted) into the path of that .pm file, e.g.:
/home/ujang/perl5/perlbrew/perls/perl-5.24.0/lib/site_perl/5.24.0/Foo/Bar.pm
To prevent such coercion, you can use prefixing path, e.g.:
./Foo::Bar
../Foo/Bar
/path/to/Foo/Bar
This schema comes with convenience completion too.
* perl::pod_filename
A .pod filename, e.g. /path/Foo.pod.
Use this schema if you want to accept a filesystem path containing
Perl POD. The value of this schema is in the convenience of CLI
completion, as well as coercion from POD name.
String containing filename of a Perl .pod file. For convenience,
when value is in the form of:
Foo
Foo.pod
Foo::Bar
Foo/Bar
Foo/Bar.pod
and a matching .pod file is found in @INC, then it will be coerced
(converted) into the filesystem path of that .pod file, e.g.:
/home/ujang/perl5/perlbrew/perls/perl-5.24.0/lib/site_perl/5.24.0/Foo/Bar.pod
To prevent such coercion, you can use prefixing path, e.g.:
./Foo::Bar
../Foo/Bar
/path/to/Foo/Bar
This schema comes with convenience completion too.
* perl::pod_or_pm_filename
A .pod or .pm filename, e.g. /path/Foo.pm or /path/Bar/Baz.pod.
String containing filename of a Perl POD or module. For convenience,
when value is in the form of:
Foo
Foo.pod
Foo.pm
Foo::Bar
Foo/Bar
Foo/Bar.pod
Foo/Bar.pm
and a matching .pod or .pm file is found in @INC, then it will be
coerced (converted) into the path of that .pod/.pm file, e.g.:
/home/ujang/perl5/perlbrew/perls/perl-5.24.0/lib/site_perl/5.24.0/Foo/Bar.pm
lib/Foo/Bar.pod
To prevent such coercion, you can use prefixing path, e.g.:
./Foo::Bar
../Foo/Bar
/path/to/Foo/Bar
This schema comes with convenience completion too.
This schema is like another schema "perl::filename" except that .pod
is prioritized over .pm. If both "Foo.pm" and "Foo.pod" are found in
@INC, the path to "Foo.pod" will be returned.
* perl::podname
Perl POD name, e.g. Moose::Cookbook.
Perl POD name, e.g. "Config", "Some::Other::POD".
Basically the same as "perl::modname", but with a different
completion.
* perl::qualified_funcname
Perl function name qualified with a package name, e.g. Foo::subname.
Currently function name is restricted to this regex:
\A[A-Za-z_][A-Za-z_0-9]*\z
and package name is restricted to this regex:
[A-Za-z_][A-Za-z_0-9]*(::[A-Za-z_0-9]+)*
This schema includes syntax validity check only; it does not check
whether the function actually exists.
* perl::release::version
One of known released versions of perl (e.g. 5.010 or 5.10.0).
Use this schema if you want to accept one of the known released
versions of perl.
The list of releases of perl is retrieved from the installed core
module Module::CoreList during runtime as well as the one used
during build. One of both those Module::CoreList instances might not
be the latest, so this list might not be up-to-date. To ensure that
the list is complete, you will need to keep your copy of
Module::CoreList up-to-date.
The list of version numbers include numified version (which,
unfortunately, collapses trailing zeros, e.g. 5.010000 into 5.010)
as well as the x.y.z version (e.g. 5.10.0).
* perl::unqualified_funcname
Perl function name which must not be qualified with a package name,
e.g. subname.
Currently function name is restricted to this regex:
\A[A-Za-z_][A-Za-z_0-9]*\z
This schema includes syntax validity check only; it does not check
whether the function actually exists.
This schema includes syntax validity check only; it does not check
whether the function actually exists.
* perl::version
Perl version object.
Use this schema if you want to accept a version object (see
version). Coercion from string is provided.
HOMEPAGE
Please visit the project's homepage at
<https://metacpan.org/release/Sah-Schemas-Perl>.
SOURCE
Source repository is at
<https://github.com/perlancar/perl-Sah-Schemas-Perl>.
SEE ALSO
Sah - schema specification
Data::Sah - Perl implementation of Sah
AUTHOR
perlancar <perlancar@cpan.org>
CONTRIBUTING
To contribute, you can send patches by email/via RT, or send pull
requests on GitHub.
Most of the time, you don't need to build the distribution yourself. You
can simply modify the code, then test via:
% prove -l
If you want to build the distribution (e.g. to try to install it locally
on your system), you can install Dist::Zilla,
Dist::Zilla::PluginBundle::Author::PERLANCAR,
Pod::Weaver::PluginBundle::Author::PERLANCAR, and sometimes one or two
other Dist::Zilla- and/or Pod::Weaver plugins. Any additional steps
required beyond that are considered a bug and can be reported to me.
COPYRIGHT AND LICENSE
This software is copyright (c) 2023, 2022, 2021, 2020, 2019, 2018, 2017,
2016 by perlancar <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.
BUGS
Please report any bugs or feature requests on the bugtracker website
<https://rt.cpan.org/Public/Dist/Display.html?Name=Sah-Schemas-Perl>
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.