## This file is auto-generated. Do not edit by hand! use strict; package Char::Class::RFC1815; our $VERSION = '3.0'; use Carp; our @EXPORT; our @EXPORT_OK; sub import ($;@) { my $from_class = shift; my ($to_class, $file, $line) = caller; no strict 'refs'; for (@_ ? @_ : @{$from_class . '::EXPORT'}) { my $code = $from_class->can ($_) or croak qq{"$_" is not exported by the $from_class module at $file line $line}; *{$to_class . '::' . $_} = $code; } } # import =head1 NAME Char::Class::RFC1815 - Regular Expression Character Classes - C =cut @EXPORT_OK = qw(InRFC1815ISO10646J1); sub InRFC1815ISO10646J1 { < =back =cut =head1 EXAMPLE use Char::Class::RFC1815 qw(InRFC1815ISO10646J1); if ($s =~ /\p{InRFC1815ISO10646J1}/) { print "Match!\n"; } =head1 LICENSE Copyright 2016 Wakaba . This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. =cut 1; ### RFC1815.pm ends here