diff options
| author | fukachan <fukachan> | 2012-02-19 09:29:00 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2012-02-19 09:29:00 +0000 |
| commit | 30f6e343cbaf52c4a13871f23e47dafd6fbb5520 (patch) | |
| tree | bb9ab11542a9e65fe74429a2b43bf5d4c5a35dbf /cpan/lib/Jcode/Constants.pm | |
| parent | 22fd3f8b8ff9693cf840ff1d78d3dcc5aa2a087f (diff) | |
| download | fml8-Jcode-2-07.tar.gz fml8-Jcode-2-07.tar.bz2 fml8-Jcode-2-07.zip | |
Jcode 2.07Jcode-2-07
Diffstat (limited to 'cpan/lib/Jcode/Constants.pm')
| -rw-r--r-- | cpan/lib/Jcode/Constants.pm | 23 |
1 files changed, 10 insertions, 13 deletions
diff --git a/cpan/lib/Jcode/Constants.pm b/cpan/lib/Jcode/Constants.pm index 923890d3..f83f7e0d 100644 --- a/cpan/lib/Jcode/Constants.pm +++ b/cpan/lib/Jcode/Constants.pm @@ -1,27 +1,24 @@ # -# $Id: Constants.pm,v 1.2 2001/05/18 05:14:38 dankogai Exp $ +# $Id: Constants.pm,v 2.0 2005/05/16 19:07:56 dankogai Exp $ # package Jcode::Constants; -use strict; use vars qw($RCSID $VERSION); -$RCSID = q$Id: Constants.pm,v 1.2 2001/05/18 05:14:38 dankogai Exp $; -$VERSION = do { my @r = (q$Revision: 1.2 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; +$RCSID = q$Id: Constants.pm,v 2.0 2005/05/16 19:07:56 dankogai Exp $; +$VERSION = do { my @r = (q$Revision: 2.0 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; use Carp; -BEGIN { - use Exporter; - use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); - @ISA = qw(Exporter); - @EXPORT = qw(); - @EXPORT_OK = qw(%CHARCODE %ESC %RE); - %EXPORT_TAGS = ( 'all' => [ @EXPORT_OK, @EXPORT ] ); -} +use Exporter; +use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); +@ISA = qw(Exporter); +@EXPORT = qw(); +@EXPORT_OK = qw(%CHARCODE %ESC %RE); +%EXPORT_TAGS = ( 'all' => [ @EXPORT_OK, @EXPORT ] ); -use vars @EXPORT_OK; +use vars qw(%CHARCODE %ESC %RE); my %_0208 = ( 1978 => '\e\$\@', |