-
-
24 Jan 2022 15:15:42 UTC
- Distribution: Jacode
- Module version: 2.13.4.26
- Source (raw)
- Browse (raw)
- Changes
- How to Contribute
- Repository
- Issues
- Testers (327 / 0 / 0)
- Kwalitee
Bus factor: 1- 68.08% Coverage
- License: perl_5
- Perl: v5.5.30
- Activity
24 month- Tools
- Download (5.14MB)
- MetaCPAN Explorer
- Permissions
- Subscribe to distribution
- Permalinks
- This version
- Latest version
++ed by:2 non-PAUSE users- Dependencies
- ExtUtils::MakeMaker
- File::Basename
- File::Copy
- File::Path
- FindBin
- Socket
- lib
- strict
- vars
- and possibly others
- Reverse dependencies
- CPAN Testers List
- Dependency graph
NAME
Jacode - Perl program for Japanese character code conversion
SYNOPSIS
use FindBin; use lib "$FindBin::Bin/lib"; use Jacode; Jacode::convert(\$line, $OUTPUT_encoding [, $INPUT_encoding [, $option]]) Jacode::xxx2yyy(\$line [, $option]) Jacode::to($OUTPUT_encoding, $line [, $INPUT_encoding [, $option]]) Jacode::jis($line [, $INPUT_encoding [, $option]]) Jacode::euc($line [, $INPUT_encoding [, $option]]) Jacode::sjis($line [, $INPUT_encoding [, $option]]) Jacode::utf8($line [, $INPUT_encoding [, $option]]) Jacode::jis_inout($JIS_Kanji_IN, $ASCII_IN) Jacode::get_inout($line) Jacode::cache() Jacode::nocache() Jacode::flushcache() Jacode::flush() Jacode::h2z_xxx(\$line) Jacode::z2h_xxx(\$line) Jacode::tr(\$line, $from, $to [, $option]) Jacode::trans($line, $from, $to [, $option]) Jacode::init()
EASY INSTALL (Paste and Run)
1. Open URL https://metacpan.org/pod/Jacode 2. Click ... ---------------------------------- Source (raw) <--- This ***raw*** Browse (raw) Changes How to Contribute Clone repository Issues Testers (NNN / NNN / NNN) Kwalitee Bus factor: 1 NN.NN% Coverage License: perl_5 Perl: v5.5.30 ---------------------------------- 3. Select All Text of Page 4. Save Text as "lib/Jacode.pm" 5. Open URL https://metacpan.org/dist/Jacode/view/lib/jacode.pl 6. Click ... ---------------------------------- Source (raw) <--- This ***raw*** Browse (raw) Changes How to Contribute Clone repository Issues Testers (NNN / NNN / NNN) Kwalitee Bus factor: 1 NN.NN% Coverage License: perl_5 Perl: v5.5.30 ---------------------------------- 7. Select All Text of Page 8. Save Text as "lib/jacode.pl"
SAMPLES
Convert SJIS to JIS and print each line with code name
use FindBin; use lib "$FindBin::Bin/lib"; #require 'jcode.pl'; use Jacode; while (defined($s = <>)) { #$code = &jcode'convert(\$s, 'jis', 'sjis'); $code = Jacode::convert(\$s, 'jis', 'sjis'); print $code, "\t", $s; }
Convert SJIS to UTF-8 and print each line by perl 5.00503 or later
use FindBin; use lib "$FindBin::Bin/lib"; #retire 'jcode.pl'; no Jcode; use Jacode; while (defined($s = <>)) { Jacode::convert(\$s, 'utf8', 'sjis'); print $s; }
Convert SJIS to UTF16-BE and print each line by perl 5.8.1 or later
use FindBin; use lib "$FindBin::Bin/lib"; use Jacode; use 5.8.1; while (defined($s = <>)) { Jacode::convert(\$s, 'UTF16-BE', 'sjis'); print $s; }
Convert SJIS to MIME-Header-ISO_2022_JP and print each line by perl 5.8.1 or later
use FindBin; use lib "$FindBin::Bin/lib"; use Jacode; use 5.8.1; while (defined($s = <>)) { Jacode::convert(\$s, 'MIME-Header-ISO_2022_JP', 'sjis'); print $s; }
AUTHOR
INABA Hitoshi <ina@cpan.org> in a CPAN
This project was originated by INABA Hitoshi.
LICENSE AND COPYRIGHT
This software is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic.
This software is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
Module Install Instructions
To install Jacode, copy and paste the appropriate command in to your terminal.
cpanm Jacode
perl -MCPAN -e shell install Jacode
For more information on module installation, please visit the detailed CPAN module installation guide.