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.