File Coverage

blib/lib/Sah/Schema/code_from_str.pm

Criterion	Covered	Total	%
statement	3	3	100.0
branch			n/a
condition			n/a
subroutine	1	1	100.0
pod			n/a
total	4	4	100.0

package Sah::Schema::code_from_str;

use strict;

our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
our $DATE = '2023-12-20'; # DATE
our $DIST = 'Sah-Schemas-Code'; # DIST
our $VERSION = '0.003'; # VERSION

our $schema = [
    code => {
        summary => 'Coderef from eval\`ed string',
        description => <<'MARKDOWN',

This schema accepts coderef or string which will be eval'ed to coderef. Note
that this means allowing your user to provide arbitrary Perl code for you to
execute! Make sure first and foremost that security-wise this is acceptable in
your case.

By default `eval()` is performed in the `main` namespace and without stricture
or warnings. See the parameterized version  if
you want to customize the `eval()`.

What's the difference between this schema and `str_or_code` (from
)? Both this schema and `str_or_code` accept string, but
this schema will directly compile any input string while `str_or_code` will only
convert string to code if it is in the form of `sub { ... }`. In other words,
this schema will always produce coderef, while `str_or_code` can produce strings
also.

MARKDOWN

        prefilters => [ ['Code::eval'=>{}] ],

        examples => [
        ],
    },
];

1;
# ABSTRACT: Coderef from string

__END__