#!/usr/local/bin/perl use utf8; ## This file is written in UTF-8 use strict; require 'mkpm.pl'; use vars qw(%PROP %SET %SET_ALIAS); $PROP{module_name} = 'RFC1815'; $PROP{version} = do{my @r=(q$Revision: 1.2 $=~/\d+/g);sprintf "%d."."%02d" x $#r,@r}; $PROP{author_name} = 'Wakaba'; $PROP{author_mail} = 'w@suika.fam.cx'; $PROP{pod_description} = < is same as ISO/IEC 8859-1 (MIME name: C. Aka Latin-1). In most situation you can simply write C<[\x{0000}-\x{00FF}]>. =item ISO-10646-J-1 The repertory of charset C is superset of BASIC JAPANESE plus FULLWIDTH ALPHANUMERICS plus HALFWIDTH KATAKANA, defined by JIS X 0221 Appendix 1. This repertory includes all available characters of Japanized Windoze NT 3.51. (Note that more characters are available in later versions of Windoze NT.) Description of RFC 1815 does mention any character of U+21xx and U+24xx. It would be a bug, since ISO-10646-J-1 is defined as alternate of JIS X 0208, including those characters. This module also includes those characters. Since description of RFC 1815 is ambitious, most of character list of C is made from the list of JIS X 0221 Appendix 1. (Note that RFC 1815 is not referring JIS X 0221-1995 because of schedule of both memo/standard.) =back EOH $PROP{pod_see_also} = < L L EOH ## ISO-10646 $SET{ISO10646J1} = col2list (<