Parent Directory
|
Revision Log
2002-10-14 Nanashi-san * ISO2022.pm, SJIS.pm: Bug fix of utf8 flag control. (Committed by Wakaba <w@suika.fam.cx>.)
| 1 | wakaba | 1.1 | |
| 2 | =head1 NAME | ||
| 3 | |||
| 4 | Encode::SJIS --- Shift JIS coding systems encoder and decoder | ||
| 5 | |||
| 6 | =head1 ENCODINGS | ||
| 7 | |||
| 8 | This module defines only two basic version of shift JIS. | ||
| 9 | Other variants are defined in Encode::SJIS::* modules. | ||
| 10 | |||
| 11 | =over 4 | ||
| 12 | |||
| 13 | =cut | ||
| 14 | |||
| 15 | package Encode::SJIS; | ||
| 16 | use 5.7.3; | ||
| 17 | use strict; | ||
| 18 | wakaba | 1.3 | our $VERSION=do{my @r=(q$Revision: 1.2 $=~/\d+/g);sprintf "%d."."%02d" x $#r,@r}; |
| 19 | wakaba | 1.1 | require Encode::Charset; |
| 20 | wakaba | 1.2 | use base qw(Encode::Encoding); |
| 21 | wakaba | 1.1 | |
| 22 | ### --- Perl Encode module common functions | ||
| 23 |