NAME

PerlIO::via::PrepareCP1251 - prepare unicode stream to be encoded as cp1251

VERSION

version 0.02

SYNOPSIS

require PerlIO::via::PrepareCP1251;

# note the filter order
open my $fh, '>:encoding(cp1251):via(PrepareCP1251)', $filename;
print {$fh} $unicode_string;
close $fh;

$INCOMPATIBLE_CHAR_MODE

Behaviour for incompatible chars:

pass            - put original symbol
default_char    - put $DEFAULT_CHAR
skip            - don't put anything
charname        - put \N{charname}

PerlIO::via interface

PUSHED

Constructor

UTF8

Require utf8 stream

WRITE

Filter text

AUTHOR

liosha <liosha@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2015 by liosha.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.