The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

IOas::CP932NEC - provides CP932NEC I/O subroutines for UTF-8 script

SYNOPSIS

use IOas::CP932NEC;

  # Octet Length as I/O Encoding
  $result = IOas::CP932NEC::length($utf8str);
  $result = IOas::CP932NEC::sprintf($utf8format, @utf8list);
  $result = IOas::CP932NEC::substr($utf8expr, $offset_as_cp932nec, $length_as_cp932nec, $utf8replacement);
  $result = IOas::CP932NEC::substr($utf8expr, $offset_as_cp932nec, $length_as_cp932nec);
  $result = IOas::CP932NEC::substr($utf8expr, $offset_as_cp932nec);

  # String Comparison as I/O Encoding
  $result = IOas::CP932NEC::cmp($utf8str_a, $utf8str_b);
  $result = IOas::CP932NEC::eq($utf8str_a, $utf8str_b);
  $result = IOas::CP932NEC::ne($utf8str_a, $utf8str_b);
  $result = IOas::CP932NEC::ge($utf8str_a, $utf8str_b);
  $result = IOas::CP932NEC::gt($utf8str_a, $utf8str_b);
  $result = IOas::CP932NEC::le($utf8str_a, $utf8str_b);
  $result = IOas::CP932NEC::lt($utf8str_a, $utf8str_b);
  @result = IOas::CP932NEC::sort(@utf8str);

  # Encoding Convert on I/O Operations
  $result = IOas::CP932NEC::getc(FILEHANDLE);
  $scalar = IOas::CP932NEC::readline(FILEHANDLE);
  @list   = IOas::CP932NEC::readline(FILEHANDLE);
  $result = IOas::CP932NEC::print(FILEHANDLE, @utf8str);
  $result = IOas::CP932NEC::printf(FILEHANDLE, $utf8format, @utf8list);

Count Length by

--------------------------------------------------------
count by    count by              count by octet
octet       UTF-8 codepoint       in I/O encoding
(useful)    (not so useful)       (useful)
--------------------------------------------------------
length      UTF8::R2::length      IOas::CP932NEC::length
sprintf                           IOas::CP932NEC::sprintf
substr      UTF8::R2::substr      IOas::CP932NEC::substr
--------------------------------------------------------

Compare String by

--------------------------------------------------------
compare by                        compare by
script encoding                   I/O encoding
--------------------------------------------------------
cmp                               IOas::CP932NEC::cmp
eq                                IOas::CP932NEC::eq
ne                                IOas::CP932NEC::ne
ge                                IOas::CP932NEC::ge
gt                                IOas::CP932NEC::gt
le                                IOas::CP932NEC::le
lt                                IOas::CP932NEC::lt
sort                              IOas::CP932NEC::sort
--------------------------------------------------------

I/O Operations

--------------------------------------------------------
raw I/O       I/O operations      I/O operations
operations    in UTF-8 encoding   with encoding convert
--------------------------------------------------------
getc          UTF8::R2::getc      IOas::CP932NEC::getc
<FILEHANDLE>                      IOas::CP932NEC::readline
print                             IOas::CP932NEC::print
printf                            IOas::CP932NEC::printf
--------------------------------------------------------

AUTHOR

INABA Hitoshi <ina@cpan.org>

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.