File Coverage

blib/lib/Sah/Schema/obj/re.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::obj::re;

use strict;

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

our $schema = [
    obj => {
        summary => 'Regexp object',
        description => <<'MARKDOWN',

This schema can be used as a stricter version of the `re` type. Unlike `re`,
this schema only accepts `Regexp` object and not string.

MARKDOWN

        isa => 'Regexp',

        examples => [
            {value=>qr//, valid=>1},
            {value=>qr(^abc$)i, valid=>1},
            {value=>'^abc$', valid=>0, summary=>'Not a Regexp object'},
        ],
    },
];

1;
# ABSTRACT: Regexp object

__END__