Parent Directory
| 
Revision Log
| 
Patch
| revision 1.2 by wakaba, Sun Sep 15 05:08:13 2002 UTC | revision 1.5 by wakaba, Fri Sep 20 14:01:45 2002 UTC | |
|---|---|---|
| # | Line 15 package Encode::ISO2022::SevenBit; | Line 15 package Encode::ISO2022::SevenBit; |
| 15 | use vars qw($VERSION); | use vars qw($VERSION); |
| 16 | $VERSION=do{my @r=(q$Revision$=~/\d+/g);sprintf "%d."."%02d" x $#r,@r}; | $VERSION=do{my @r=(q$Revision$=~/\d+/g);sprintf "%d."."%02d" x $#r,@r}; |
| 17 | use base qw(Encode::Encoding); | use base qw(Encode::Encoding); |
| 18 | __PACKAGE__->Define (qw/iso-2022-7bit jis junet jis7/); | __PACKAGE__->Define (qw/iso-2022-7bit iso-2022-7 jis junet jis7/); |
| 19 | require Encode::ISO2022; | require Encode::ISO2022; |
| 20 | ||
| 21 | sub encode ($$;$) { | sub encode ($$;$) { |
| # | Line 34 sub decode ($$;$) { | Line 34 sub decode ($$;$) { |
| 34 | =item iso-2022-7bit | =item iso-2022-7bit |
| 35 | ||
| 36 | ISO/IEC 2022 based 7-bit encoding using only G0 | ISO/IEC 2022 based 7-bit encoding using only G0 |
| 37 | (Alias: junet, jis, jis7) | (Alias: junet, jis, jis7, iso-2022-7) |
| 38 | ||
| 39 | =cut | =cut |
| 40 | ||
| # | Line 47 sub __2022__common ($) { |