.\" Automatically generated by Pod::Man 2.25 (Pod::Simple 3.16)
.\"
.\" Standard preamble:
.\" ========================================================================
.de Sp \" Vertical space (when we can't use .PP)
.if t .sp .5v
.if n .sp
..
.de Vb \" Begin verbatim text
.ft CW
.nf
.ne \\$1
..
.de Ve \" End verbatim text
.ft R
.fi
..
.\" Set up some character translations and predefined strings.  \*(-- will
.\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
.\" double quote, and \*(R" will give a right double quote.  \*(C+ will
.\" give a nicer C++.  Capital omega is used to do unbreakable dashes and
.\" therefore won't be available.  \*(C` and \*(C' expand to `' in nroff,
.\" nothing in troff, for use with C<>.
.tr \(*W-
.ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
.ie n \{\
.    ds -- \(*W-
.    ds PI pi
.    if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
.    if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\"  diablo 12 pitch
.    ds L" ""
.    ds R" ""
.    ds C` ""
.    ds C' ""
'br\}
.el\{\
.    ds -- \|\(em\|
.    ds PI \(*p
.    ds L" ``
.    ds R" ''
'br\}
.\"
.\" Escape single quotes in literal strings from groff's Unicode transform.
.ie \n(.g .ds Aq \(aq
.el       .ds Aq '
.\"
.\" If the F register is turned on, we'll generate index entries on stderr for
.\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index
.\" entries marked with X<> in POD.  Of course, you'll have to process the
.\" output yourself in some meaningful fashion.
.ie \nF \{\
.    de IX
.    tm Index:\\$1\t\\n%\t"\\$2"
..
.    nr % 0
.    rr F
.\}
.el \{\
.    de IX
..
.\}
.\"
.\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
.\" Fear.  Run.  Save yourself.  No user-serviceable parts.
.    \" fudge factors for nroff and troff
.if n \{\
.    ds #H 0
.    ds #V .8m
.    ds #F .3m
.    ds #[ \f1
.    ds #] \fP
.\}
.if t \{\
.    ds #H ((1u-(\\\\n(.fu%2u))*.13m)
.    ds #V .6m
.    ds #F 0
.    ds #[ \&
.    ds #] \&
.\}
.    \" simple accents for nroff and troff
.if n \{\
.    ds ' \&
.    ds ` \&
.    ds ^ \&
.    ds , \&
.    ds ~ ~
.    ds /
.\}
.if t \{\
.    ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u"
.    ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u'
.    ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u'
.    ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u'
.    ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u'
.    ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u'
.\}
.    \" troff and (daisy-wheel) nroff accents
.ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V'
.ds 8 \h'\*(#H'\(*b\h'-\*(#H'
.ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#]
.ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H'
.ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u'
.ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#]
.ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#]
.ds ae a\h'-(\w'a'u*4/10)'e
.ds Ae A\h'-(\w'A'u*4/10)'E
.    \" corrections for vroff
.if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u'
.if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u'
.    \" for low resolution devices (crt and lpr)
.if \n(.H>23 .if \n(.V>19 \
\{\
.    ds : e
.    ds 8 ss
.    ds o a
.    ds d- d\h'-1'\(ga
.    ds D- D\h'-1'\(hy
.    ds th \o'bp'
.    ds Th \o'LP'
.    ds ae ae
.    ds Ae AE
.\}
.rm #[ #] #H #V #F C
.\" ========================================================================
.\"
.IX Title "Locale::Script 3perl"
.TH Locale::Script 3perl "2011-09-26" "perl v5.14.2" "Perl Programmers Reference Guide"
.\" For nroff, turn off justification.  Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.if n .ad l
.nh
.SH "NAME"
Locale::Script \- standard codes for script identification
.SH "SYNOPSIS"
.IX Header "SYNOPSIS"
.Vb 1
\&   use Locale::Script;
\&
\&   $script  = code2script(\*(Aqphnx\*(Aq);                     # \*(AqPhoenician\*(Aq
\&   $code    = script2code(\*(AqPhoenician\*(Aq);               # \*(AqPhnx\*(Aq
\&   $code    = script2code(\*(AqPhoenician\*(Aq,
\&                          LOCALE_CODE_NUMERIC);        # 115
\&
\&   @codes   = all_script_codes();
\&   @scripts = all_script_names();
.Ve
.SH "DESCRIPTION"
.IX Header "DESCRIPTION"
The \f(CW\*(C`Locale::Script\*(C'\fR module provides access to standards codes used
for identifying scripts, such as those defined in \s-1ISO\s0 15924.
.PP
Most of the routines take an optional additional argument which
specifies the code set to use. If not specified, the default \s-1ISO\s0
15924 four-letter codes will be used.
.SH "SUPPORTED CODE SETS"
.IX Header "SUPPORTED CODE SETS"
There are several different code sets you can use for identifying
scripts. The ones currently supported are:
.IP "\fBalpha\fR" 4
.IX Item "alpha"
This is a set of four-letter (capitalized) codes from \s-1ISO\s0 15924
such as 'Phnx' for Phoenician.
.Sp
This code set is identified with the symbol \f(CW\*(C`LOCALE_SCRIPT_ALPHA\*(C'\fR.
.Sp
The Zxxx, Zyyy, and Zzzz codes are not used.
.Sp
This is the default code set.
.IP "\fBnumeric\fR" 4
.IX Item "numeric"
This is a set of three-digit numeric codes from \s-1ISO\s0 15924 such as 115
for Phoenician.
.Sp
This code set is identified with the symbol \f(CW\*(C`LOCALE_SCRIPT_NUMERIC\*(C'\fR.
.SH "ROUTINES"
.IX Header "ROUTINES"
.IP "\fBcode2script ( \s-1CODE\s0 [,CODESET] )\fR" 4
.IX Item "code2script ( CODE [,CODESET] )"
.PD 0
.IP "\fBscript2code ( \s-1NAME\s0 [,CODESET] )\fR" 4
.IX Item "script2code ( NAME [,CODESET] )"
.IP "\fBscript_code2code ( \s-1CODE\s0 ,CODESET ,CODESET2 )\fR" 4
.IX Item "script_code2code ( CODE ,CODESET ,CODESET2 )"
.IP "\fBall_script_codes ( [\s-1CODESET\s0] )\fR" 4
.IX Item "all_script_codes ( [CODESET] )"
.IP "\fBall_script_names ( [\s-1CODESET\s0] )\fR" 4
.IX Item "all_script_names ( [CODESET] )"
.IP "\fBLocale::Script::rename_script  ( \s-1CODE\s0 ,NEW_NAME [,CODESET] )\fR" 4
.IX Item "Locale::Script::rename_script  ( CODE ,NEW_NAME [,CODESET] )"
.IP "\fBLocale::Script::add_script  ( \s-1CODE\s0 ,NAME [,CODESET] )\fR" 4
.IX Item "Locale::Script::add_script  ( CODE ,NAME [,CODESET] )"
.IP "\fBLocale::Script::delete_script  ( \s-1CODE\s0 [,CODESET] )\fR" 4
.IX Item "Locale::Script::delete_script  ( CODE [,CODESET] )"
.IP "\fBLocale::Script::add_script_alias  ( \s-1NAME\s0 ,NEW_NAME )\fR" 4
.IX Item "Locale::Script::add_script_alias  ( NAME ,NEW_NAME )"
.IP "\fBLocale::Script::delete_script_alias  ( \s-1NAME\s0 )\fR" 4
.IX Item "Locale::Script::delete_script_alias  ( NAME )"
.IP "\fBLocale::Script::rename_script_code  ( \s-1CODE\s0 ,NEW_CODE [,CODESET] )\fR" 4
.IX Item "Locale::Script::rename_script_code  ( CODE ,NEW_CODE [,CODESET] )"
.IP "\fBLocale::Script::add_script_code_alias  ( \s-1CODE\s0 ,NEW_CODE [,CODESET] )\fR" 4
.IX Item "Locale::Script::add_script_code_alias  ( CODE ,NEW_CODE [,CODESET] )"
.IP "\fBLocale::Script::delete_script_code_alias  ( \s-1CODE\s0 [,CODESET] )\fR" 4
.IX Item "Locale::Script::delete_script_code_alias  ( CODE [,CODESET] )"
.PD
These routines are all documented in the Locale::Codes man page.
.SH "SEE ALSO"
.IX Header "SEE ALSO"
.IP "\fBLocale::Codes\fR" 4
.IX Item "Locale::Codes"
.PD 0
.IP "\fBLocale::Constants\fR" 4
.IX Item "Locale::Constants"
.IP "\fBhttp://www.unicode.org/iso15924/\fR" 4
.IX Item "http://www.unicode.org/iso15924/"
.PD
Home page for \s-1ISO\s0 15924.
.SH "AUTHOR"
.IX Header "AUTHOR"
See Locale::Codes for full author history.
.PP
Currently maintained by Sullivan Beck (sbeck@cpan.org).
.SH "COPYRIGHT"
.IX Header "COPYRIGHT"
.Vb 3
\&   Copyright (c) 1997\-2001 Canon Research Centre Europe (CRE).
\&   Copyright (c) 2001\-2010 Neil Bowers
\&   Copyright (c) 2010\-2011 Sullivan Beck
.Ve
.PP
This module is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.