view release on metacpan or search on metacpan
parser_free|5.009005||Viu
parser_free_nexttoke_ops|5.017006||Viu
parse_stmtseq|5.013006|5.013006|x
parse_subsignature|5.031003|5.031003|x
parse_termexpr|5.013008|5.013008|x
parse_unicode_opts|5.008001||Viu
parse_uniprop_string|5.027011||cViu
path_is_searchable|5.019001||nViu
peep|5.003007||Viu
pending_ident|5.017004||Viu
PERL_ABS|5.008001|5.003007|p
#ifndef PERL_PV_PRETTY_REGPROP
# define PERL_PV_PRETTY_REGPROP PERL_PV_PRETTY_ELLIPSES|PERL_PV_PRETTY_LTGT|PERL_PV_ESCAPE_RE
#endif
/* Hint: pv_escape
* Note that unicode functionality is only backported to
* those perl versions that support it. For older perl
* versions, the implementation will fall back to bytes.
*/
#ifndef pv_escape
view all matches for this distribution
view release on metacpan or search on metacpan
parse_listexpr||5.013008|
parse_lparen_question_flags|||
parse_stmtseq||5.013006|
parse_subsignature|||
parse_termexpr||5.013008|
parse_unicode_opts|||
parser_dup|||
parser_free_nexttoke_ops|||
parser_free|||
path_is_searchable|||n
peep|||
#ifndef PERL_PV_PRETTY_REGPROP
# define PERL_PV_PRETTY_REGPROP PERL_PV_PRETTY_ELLIPSES|PERL_PV_PRETTY_LTGT|PERL_PV_ESCAPE_RE
#endif
/* Hint: pv_escape
* Note that unicode functionality is only backported to
* those perl versions that support it. For older perl
* versions, the implementation will fall back to bytes.
*/
#ifndef pv_escape
view all matches for this distribution
view release on metacpan or search on metacpan
parser_free|5.009005||Viu
parser_free_nexttoke_ops|5.017006||Viu
parse_stmtseq|5.013006|5.013006|x
parse_subsignature|5.031003|5.031003|x
parse_termexpr|5.013008|5.013008|x
parse_unicode_opts|5.008001||Viu
parse_uniprop_string|5.027011||cViu
path_is_searchable|5.019001||nViu
peep|5.003007||Viu
pending_ident|5.017004||Viu
PERL_ABS|5.008001|5.003007|p
#ifndef PERL_PV_PRETTY_REGPROP
# define PERL_PV_PRETTY_REGPROP PERL_PV_PRETTY_ELLIPSES|PERL_PV_PRETTY_LTGT|PERL_PV_ESCAPE_RE
#endif
/* Hint: pv_escape
* Note that unicode functionality is only backported to
* those perl versions that support it. For older perl
* versions, the implementation will fall back to bytes.
*/
#ifndef pv_escape
view all matches for this distribution
view release on metacpan or search on metacpan
pad_sv||5.011000|
pad_swipe|||
pad_tidy|||
pad_undef|||
parse_body|||
parse_unicode_opts|||
parser_dup|||
parser_free|||
path_is_absolute|||n
peep|||
pending_Slabs_to_ro|||
#ifndef PERL_PV_PRETTY_REGPROP
# define PERL_PV_PRETTY_REGPROP PERL_PV_PRETTY_ELLIPSES|PERL_PV_PRETTY_LTGT|PERL_PV_ESCAPE_RE
#endif
/* Hint: pv_escape
* Note that unicode functionality is only backported to
* those perl versions that support it. For older perl
* versions, the implementation will fall back to bytes.
*/
#ifndef pv_escape
view all matches for this distribution
view release on metacpan or search on metacpan
parse_listexpr||5.013008|
parse_lparen_question_flags|||
parse_stmtseq||5.013006|
parse_subsignature|||
parse_termexpr||5.013008|
parse_unicode_opts|||
parser_dup|||
parser_free_nexttoke_ops|||
parser_free|||
path_is_searchable|||n
peep|||
#ifndef PERL_PV_PRETTY_REGPROP
# define PERL_PV_PRETTY_REGPROP PERL_PV_PRETTY_ELLIPSES|PERL_PV_PRETTY_LTGT|PERL_PV_ESCAPE_RE
#endif
/* Hint: pv_escape
* Note that unicode functionality is only backported to
* those perl versions that support it. For older perl
* versions, the implementation will fall back to bytes.
*/
#ifndef pv_escape
view all matches for this distribution
view release on metacpan or search on metacpan
t/02-read.t view on Meta::CPAN
{
"port"=>5000,
"pi"=>"3.14159265",
"enabled"=>0,
"mask"=>-1430532899,
"unicode"=>"STARGÎÌTE SG-1",
"bigint"=>9223372036854775807,
"bighex"=>1234605616436508552,
},
"value for list - status ok",
);
view all matches for this distribution
view release on metacpan or search on metacpan
perlcritic.rc view on Meta::CPAN
severity = 1
color = 1
verbose = 9
theme = (bangs || bugs || complexity || core || cosmetic || danger || lax || maintenance || moose || pbp || performance || portability || pulp || readability || security || strictersubs || swift || tests || unicode) && (! (compatibility || deprecated...
exclude = RequireTidyCode RequirePodSections ProhibitPostfixControls RequireRcsKeywords RequireExplicitPackage Moose::ProhibitMultipleWith RequirePodLinksIncludeText Documentation::RequirePodAtEnd ValuesAndExpressions::ProhibitVersionStrings Bangs::P...
include = Moose::ProhibitNewMethod Moose::RequireCleanNamespace Moose::RequireMakeImmutable
[Bangs::ProhibitVagueNames]
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Config/ppport.h view on Meta::CPAN
pad_sv||5.009005|
pad_swipe|||
pad_tidy|||
pad_undef|||
parse_body|||
parse_unicode_opts|||
parser_dup|||
parser_free|||
path_is_absolute|||n
peep|||
pending_Slabs_to_ro|||
view all matches for this distribution
view release on metacpan or search on metacpan
Debian_CPANTS.txt view on Meta::CPAN
"libtoolkit-perl", "Toolkit", "0.0.2", "0", "0"
"libtree-dagnode-perl", "Tree-DAG_Node", "1.06", "0", "0"
"libtree-redblack-perl", "Tree-RedBlack", "0.3", "0", "0"
"libtree-simple-perl", "Tree-Simple", "1.18", "0", "0"
"libtree-simple-visitorfactory-perl", "Tree-Simple-VisitorFactory", "0.10", "0", "0"
"libunicode-map-perl", "Unicode-Map", "0.112", "0", "1"
"libunicode-map8-perl-dfsg", "Unicode-Map8", "0.12", "0", "2"
"libunicode-maputf8-perl", "Unicode-MapUTF8", "1.11", "0", "0"
"libunicode-string-perl", "Unicode-String", "2.09", "0", "0"
"libuniversal-can-perl", "UNIVERSAL-can", "1.12", "0", "0"
"libuniversal-isa-perl", "UNIVERSAL-isa", "0.06", "0", "0"
"libuniversal-require-perl", "UNIVERSAL-require", "0.11", "0", "0"
"libunix-syslog-perl", "Unix-Syslog", "1.1", "0", "0"
"liburi-query-perl", "URI-Query", "0.06", "0", "0"
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Config/IniFiles.pm view on Meta::CPAN
}
}
# If there's a UTF BOM (Byte-Order-Mark) in the first
# character of the first line then remove it before processing
# ( http://www.unicode.org/unicode/faq/utf_bom.html#22 )
$s =~ s/\A//;
return $s;
}
else
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Config/JSON/Enhanced.pm view on Meta::CPAN
use warnings;
# which loads JSON::XS with a purel-perl JSON fallback
use JSON;
use Data::Roundtrip qw/json2perl perl2dump no-unicode-escape-permanently/;
use Exporter; # we have our own import() don't import it
our @ISA = qw(Exporter);
our @EXPORT = qw/
config2perl
lib/Config/JSON/Enhanced.pm view on Meta::CPAN
substituted, verbatim sections become one line again
and standard JSON is created. This is parsed with
L<JSON> (via L<Data::Roundtrip::json2perl>) to
produce a Perl data structure which is returned.
It has been tested with unicode data
(see C<t/070-config2perl-complex-utf8.t>)
with success. But who knows ?!?!
Here is an example:
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Config/Maker/Encode.pm view on Meta::CPAN
To fully support recoding, the modules L<Encode>, L<Encode::Alias>,
L<PerlIO::encoding> and L<I18N::Langinfo> must be available. If they are not,
dummy replacements are used as described above. In that case, C<Config::Maker>
will only work when all files are in the same default encoding and non-ascii
characters won't work in identifiers (since the data can't be internaly
translated to unicode).
=head1 AUTHOR
Jan Hudec <bulb@ucw.cz>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Config/Model/models/Systemd/Common/Exec.pl view on Meta::CPAN
'description' => 'Similar to C<Environment>, but reads the environment variables from
a text file. The text file should contain newline-separated variable assignments. Empty lines, lines
without an C<=> separator, or lines starting with C<;> or
C<#> will be ignored, which may be used for commenting. The file must be encoded with
UTF-8. Valid characters are
L<unicode scalar values|https://www.unicode.org/glossary/#unicode_scalar_value>
other than
L<unicode noncharacters|https://www.unicode.org/glossary/#noncharacter>,
C<U+0000> C<NUL>, and C<U+FEFF>L<unicode byte order mark|https://www.unicode.org/glossary/#byte_order_mark>.
Control codes other than C<NUL> are allowed.
In the file, an unquoted value after the C<=> is parsed with the same backslash-escape
rules as L<POSIX shell unquoted
text|https://pubs.opengroup.org/onlinepubs/9699919799/utilities/V3_chap02.html#tag_18_02_01>, but unlike in a shell,
view all matches for this distribution
view release on metacpan or search on metacpan
fallback_models/KeyboardOptRules.pl view on Meta::CPAN
],
{
'help' => {
'ben' => 'Bengali',
'tam' => 'Tamil',
'tam_unicode' => 'Tamil Unicode',
'mal' => 'Malayalam',
'guru' => 'Gurmukhi',
'kan' => 'Kannada',
'tam_TSCII' => 'Tamil TSCII Typewriter',
'guj' => 'Gujarati',
fallback_models/KeyboardOptRules.pl view on Meta::CPAN
'guj',
'guru',
'kan',
'mal',
'ori',
'tam_unicode',
'tam_TAB',
'tam_TSCII',
'tam',
'tel',
'urd'
fallback_models/KeyboardOptRules.pl view on Meta::CPAN
],
{
'help' => {
'alternatequotes' => 'With guillemots',
'latinyz' => 'Latin qwerty',
'latinunicodeyz' => 'Latin Unicode qwerty',
'latinalternatequotes' => 'Latin with guillemots',
'latinunicode' => 'Latin Unicode',
'latin' => 'Latin',
'yz' => 'Z and ZHE swapped'
},
'choice' => [
'yz',
'latin',
'latinunicode',
'latinyz',
'latinunicodeyz',
'alternatequotes',
'latinalternatequotes'
]
},
[
fallback_models/KeyboardOptRules.pl view on Meta::CPAN
'lk'
],
{
'help' => {
'tam_TSCII' => 'Tamil TSCII Typewriter',
'tam_unicode' => 'Tamil Unicode',
'sin_phonetic' => 'Sinhala phonetic',
'tam_TAB' => 'Tamil TAB Typewriter'
},
'choice' => [
'tam_unicode',
'tam_TAB',
'tam_TSCII',
'sin_phonetic'
]
},
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Config/Model/TermUI.pm view on Meta::CPAN
#
package Config::Model::TermUI 2.155;
use Carp;
use utf8; # so literals and identifiers can be in UTF-8
use v5.12; # or later to get "unicode_strings" feature
use strict;
use warnings;
use open qw(:std :utf8); # undeclared streams in UTF-8
use Encode qw(decode_utf8);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Config/Multi.pm view on Meta::CPAN
use base qw/Class::Accessor/;
our $VERSION = '0.12';
__PACKAGE__->mk_accessors(qw/app_name prefix dir files extension unicode/);
sub load {
my $self = shift;
my @files = ();
$self->{extension} ||= 'yml';
lib/Config/Multi.pm view on Meta::CPAN
$config = { %{$config}, %{ $local_config->{$_} } };
}
$self->{files} = \@files;
if ( $self->unicode ) {
my $rd = Unicode::RecursiveDowngrade->new;
$rd->filter(sub { Encode::decode('utf8',shift) });
$config = $rd->downgrade($config);
}
lib/Config/Multi.pm view on Meta::CPAN
use File::Spec;
use FindBin;
my $dir = File::Spec->catfile( $FindBin::Bin , 'conf' );
# prefix, extension and unicode is optional.
my $cm
= Config::Multi->new({
dir => $dir ,
app_name => 'myapp' ,
prefix => 'web' ,
extension => 'yml' ,
unicode => 1 # unicode option
});
my $config = $cm->load();
my $loaded_config_files = $cm->files;
=head1 DESCRIPTION
lib/Config/Multi.pm view on Meta::CPAN
instead of ${app_name}_local.yml , you can specify the path with $ENV{CONFIG_MULTI_MYAPP}
note. PREFIX = uc($prefix); MYAPP = uc($app_name)
=head2 unicode option
if you set true to unicode option, return $config of flagged UTF-8.
in the future, this option will also be posiible to default.
at least I would hope so.
=head1 METHODS
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Config/Properties.pm view on Meta::CPAN
}
# process_line() - read and parse a line from the properties file.
# this is to workaround a bug in perl 5.6.0 related to unicode
my $bomre = eval(q< qr/^\\x{FEFF}/ >) || qr//;
sub process_line {
my ($self, $file) = @_;
my $line = $self->read_line($file);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Config/Scoped.pm view on Meta::CPAN
#########################################################################
#
key : perl_code | token | perl_quote
value : perl_code | token | perl_quote
# everything unless separator characters, better than \w in unicode times
token : /[^ \s >< }{ )( [\] ; , ' " = # % ]+/x
perl_quote : .../"|'|<</ <perl_quotelike>
{
$thisparser->{local}{line} = $thisline;
view all matches for this distribution
view release on metacpan or search on metacpan
#include "ppport.h"
#include "const-c.inc"
#include <ucl.h>
bool implicit_unicode;
int ucl_string_flags;
static ucl_object_t *
_iterate_perl (pTHX_ SV* obj) {
if ( SvTYPE(obj) == SVt_NULL ) {
return newSViv((long long)ucl_object_toint (obj));
case UCL_FLOAT:
return newSVnv(ucl_object_todouble (obj));
case UCL_STRING: {
SV *sv = newSVpv(ucl_object_tostring (obj), 0);
if (implicit_unicode) {
SvUTF8_on(sv);
}
return sv;
}
case UCL_BOOLEAN: {
val = sv_2mortal((SV*)newHV());
while ((cur = ucl_object_iterate (obj, &it_obj, true))) {
SV *key = newSVpv(ucl_object_key(cur),0);
if (implicit_unicode)
SvUTF8_on(key);
hv_store_ent((HV*)val, sv_2mortal(key), _iterate_ucl(aTHX_ cur), 0);
}
val = newRV(val);
} else if (obj->type == UCL_ARRAY) {
INCLUDE: const-xs.inc
PROTOTYPES: ENABLED
SV *
_ucl_dump(SV *sv, bool _implicit_unicode, ucl_emitter_t emitter)
CODE:
implicit_unicode = _implicit_unicode;
ucl_object_t *root = NULL;
root = _iterate_perl(aTHX_ sv);
if (root) {
RETVAL = newSVpv((char *)ucl_object_emit(root, emitter), 0);
if (implicit_unicode)
SvUTF8_on(RETVAL);
ucl_object_unref(root);
}
OUTPUT:
RETVAL
DESTROY(struct ucl_parser *parser)
CODE:
ucl_parser_free(parser);
SV *
ucl_load(struct ucl_parser *parser, bool _implicit_unicode, int _ucl_string_flags)
CODE:
implicit_unicode = _implicit_unicode;
ucl_string_flags = _ucl_string_flags;
RETVAL = _load_ucl(aTHX_ parser);
OUTPUT:
RETVAL
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Config/Wrest.pm view on Meta::CPAN
will be detected and the serialization will throw a fatal error.
=head1 SEE ALSO
parse_file(), write_file() and the '@include' directive load L<File::Slurp::WithinPolicy> on demand to perform the file input/output operations.
See L<perlunicode> for more details on perl's Unicode handling, and L<Encode> for character recoding.
See L<Any::Template>, and the relevant templating modules, if the 'Subs' option is true.
Although this module can read and write data structures it is not intended as an all-purpose serialization system. For that
see L<Storable>.
Unicode Newline Guidelines from http://www.unicode.org/versions/Unicode4.0.0/ch05.pdf#G10213
=head1 VERSION
$Revision: 1.36 $ on $Date: 2006/08/22 14:09:50 $ by $Author: mattheww $
view all matches for this distribution
view release on metacpan or search on metacpan
raw bytes.
=item C<BER_TYPE_UTF8>
Like C<BER_TYPE_BYTES>, but decodes the value as if it were a UTF-8 string
(without validation!) and encodes a perl unicode string into a UTF-8 BER
string.
=item C<BER_TYPE_UCS2>
Similar to C<BER_TYPE_UTF8>, but treats the BER value as UCS-2 encoded
view all matches for this distribution
view release on metacpan or search on metacpan
parse_listexpr||5.013008|
parse_lparen_question_flags|||
parse_stmtseq||5.013006|
parse_subsignature|||
parse_termexpr||5.013008|
parse_unicode_opts|||
parser_dup|||
parser_free_nexttoke_ops|||
parser_free|||
path_is_searchable|||n
peep|||
#ifndef PERL_PV_PRETTY_REGPROP
# define PERL_PV_PRETTY_REGPROP PERL_PV_PRETTY_ELLIPSES|PERL_PV_PRETTY_LTGT|PERL_PV_ESCAPE_RE
#endif
/* Hint: pv_escape
* Note that unicode functionality is only backported to
* those perl versions that support it. For older perl
* versions, the implementation will fall back to bytes.
*/
#ifndef pv_escape
view all matches for this distribution
view release on metacpan or search on metacpan
tests/include/pdclib/auxiliary/uctype/test.h
tests/include/pdclib/auxiliary/uctype/text_utilities.c
tests/include/pdclib/auxiliary/uctype/text_utilities.h
tests/include/pdclib/auxiliary/uctype/uctype.c
tests/include/pdclib/auxiliary/uctype/uctype.h
tests/include/pdclib/auxiliary/uctype/unicode_data.c
tests/include/pdclib/auxiliary/uctype/unicode_data.h
tests/include/pdclib/CMakeLists.txt
tests/include/pdclib/COPYING.CC0
tests/include/pdclib/functions/_dlmalloc/malloc-2.8.6.patch
tests/include/pdclib/functions/_dlmalloc/malloc.c
tests/include/pdclib/functions/_PDCLIB/_PDCLIB_atomax.c
view all matches for this distribution
view release on metacpan or search on metacpan
examples/demo.pl view on Meta::CPAN
my $ascii = "HELLO";
print "[0/6] Testing Braille-ASCII : \"$ascii\"\n";
my $unicode = brailleAscii_To_Unicode ( $ascii );
print "[1/6] brailleAscii_To_Unicode : $ascii => $unicode (has length: ", length($unicode), ")\n";
my $dots = brailleAscii_To_DotNumbers ( $ascii );
print "[2/6] brailleAscii_To_DotNumbers : $ascii => $dots\n";
$ascii = brailleDotNumbers_To_Ascii ( $dots );
print "[3/6] brailleDotNumbers_To_Ascii : $dots => $ascii\n";
$unicode = brailleDotNumbers_To_Unicode ( $dots );
print "[4/6] brailleDotNumbers_To_Unicode: $dots => $unicode (has length: ", length($unicode), ")\n";
$Convert::Braille::dot_separator ="-";
$dots = brailleUnicode_To_DotNumbers ( $unicode );
print "[5/6] brailleUnicode_To_DotNumbers: $unicode => $dots\n";
$Convert::Braille::dot_separator = undef;
$ascii = brailleUnicode_To_Ascii ( $unicode );
print "[6/6] brailleUnicode_To_Ascii : $unicode => $ascii\n";
__END__
=head1 NAME
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Convert/CharMap.pm view on Meta::CPAN
my $map = Convert::CharMap->load(CharMapML => 'test.xml');
$map->save(UCM => 'test.ucm');
=head1 DESCRIPTION
This module transforms between unicode character map formats, using
an in-memory representation of C<CharMapML> as the intermediate format.
Currently this module supports the C<CharMapML>, C<YAML> and C<UCM>
(write-only) backends.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Convert/Ethiopic/System.pm view on Meta::CPAN
$WITHAM
$WITHSLASH
$WITHDAYCOMMA
$WITHUTF8
$unicode
$utf8
$sera
$image
$amh
lib/Convert/Ethiopic/System.pm view on Meta::CPAN
%ISOLanguages;
);
enumerate ( $TTName, $LESysNum, $LESysTV, $LEFontNum, $HasNum, $HTMLName );
enumerate ( $nocs, $acis, $acuwork, $addisword1, $addisword2, $alpas, $branai, $branaii, $cbhalea, $cbhaleb, $dehai, $dejene1, $dejene2, $ecoling, $ed, $enhpfr, $ethcitap, $ethcitas, $ethcitau, $ethiome, $ethiomex, $ethiop, $ethiopic1, $ethiopic2, $...
enumerate ( $notv, $clike, $decimal, $dos, $java, $uname, $uplus, $utf7, $utf8, $utf16, $zerox );
$noOps = 0;
lib/Convert/Ethiopic/System.pm view on Meta::CPAN
#
'EthioSoft' => [ 'EthioSoft', $ethiosoft, 0, 0, 1, 'ityo\\Soft\\' ],
#
# Unicode Based http://www.unicode.org/
#
'UTF7' => [ 'none', $unicode, $utf7, 0, 1, '\\UTF7\\' ],
'UTF8' => [ 'none', $unicode, $utf8, 0, 1, '\\UTF8\\' ],
'utf16' => [ 'none', $unicode, $utf16, 0, 1, '\\UTF16\\' ],
'unicode' => [ 'none', $unicode, $utf16, 0, 1, '\\UTF16\\' ],
'FirstTime' => [ 'none', $unicode, $utf8, 0, 1, '\\UTF8\\' ],
#
# Visual Ge'ez
#
'VG2-Main' => [ 'VG2 Main', $visualgez, 0, 0, 0, '\\Visual\\gI2z' ],
lib/Convert/Ethiopic/System.pm view on Meta::CPAN
'EXTRA~\`_FIDEL' => [ 'EXTRA~`_FIDEL', $fidelxtr2, 0, 1, 1, 'fidel' ],
#
# Extraneous Systems
#
'clike' => [ $noOps, $unicode, $clike, 0, 1, '\\ \\\\xABCD\\' ],
'Clike' => [ $uppercase, $unicode, $clike, 0, 1, '\\ \\\\xABCD\\' ],
'debug' => [ $debug, $sera, 0, 0, 1, '\\Debugging\\' ],
'decimal' => [ $noOps, $unicode, $decimal, 0, 1, '\\Debugging\\' ],
# 'image' => [ $noOps, $image, 0, 0, 1, '\\Image Fonts\\' ],
# 'Image' => [ $noOps, $image, 0, 0, 1, '\\Image Fonts\\' ],
'Image' => [ 'GF Zemen Primary', $gezfree1, 0, 0, 1, 'gI2z\\Free\\' ],
'java' => [ $noOps, $unicode, $java, 0, 1, '\\Java\\' ],
'Java' => [ $uppercase, $unicode, $java, 0, 1, '\\Java\\' ],
'UPlus' => [ $noOps, $unicode, $uplus, 0, 1, '\\U+abcd\\' ],
'UPlus' => [ $uppercase, $unicode, $uplus, 0, 1, '\\U+ABCD\\' ],
'zerox' => [ $noOps, $unicode, $zerox, 0, 1, '\\0xabcd\\' ],
'Zerox' => [ $uppercase, $unicode, $zerox, 0, 1, '\\0xABCD\\' ]
);
%TransferVariant = ( notv => $notv,
clike => $clike,
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Pod/Markdown.pm view on Meta::CPAN
if ($section){
# TODO: sites/pod formatters differ on how to transform the section
# TODO: we could do it according to specified url prefix or pod formatter
# TODO: or allow a coderef?
# TODO: (Pod::Simple::XHTML:idify() for metacpan)
# TODO: (Pod::Simple::HTML section_escape/unicode_escape_url/section_url_escape for s.c.o.)
$url .= '#' . $section;
}
}
# if we don't know how to handle the url just print the pod back out
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Convert/X509.pod view on Meta::CPAN
Result of method differs for scalar and list context:
- a hash-reference like {'C'=>['org'], 'OU'=>['cpan','search']};
values list often contains only one element, but many in general
- a list like ('CN=Name Surname','C=RU','L=Moscow')
X509 data may contains unicode strings,
so in general we have to decode it to localized one-byte oriented string.
It is the _second_ parameter (result codepage) subject method could accept.
But sometimes X509 data contains already "localized" one-byte string.
And its codepage (_first_ param accepted by subject)
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Convert/XText.pm view on Meta::CPAN
=over 4
=item encode_xtext ($string_to_encode)
Expects a non-unicode-string to encode in xtext encoding. Returns
the encoded text.
=item decode_xtext ($string_to_decode)
Expects an xtext-encoded string and returns the decoded string.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Convert/YText.pm view on Meta::CPAN
for use as the local part in an internet email address (RFC2822).
By default spaces are replaced with "+", "/" with "~", the characters
"A-Za-z0-9_.-" encode as themselves, and everything else is written
"=USTR=" where USTR is the base64 (using "A-Za-z0-9_." as digits)
encoding of the unicode character code. The encoding is configurable
(see below).
=head1 PROCEDURAL INTERFACE
The module can can export C<encode_ytext> which converts arbitrary
unicode string into a "safe" form, and C<decode_ytext> which recovers
the original text. C<validate_ytext> is a heuristic which returns 0
for bad input.
=cut
view all matches for this distribution