open - ��ュ�阪����勉�������勉�������í�˨����� PerlIO 絮ゃ����祉�������������������� perl �����í�違��
use open IN => ":crlf", OUT => ":bytes";
use open OUT => ':utf8';
use open IO => ":encoding(iso-8859-7)";
use open IO => ':locale';
use open ':encoding(utf8)';
use open ':locale';
use open ':encoding(iso-8859-7)';
use open ':std';
Perl ��� IO ��激�鴻�����(�憜����勉�������í�˨��)��������� PerlIO ��� 篏帥����������̬┃絎���������⓾�������翫�����I/O 絮ゃ�������⓾�勖�㋛�主����ɱ嚳綽���� 絎�茖���������⓾����障�����
open
�����í�違����壔����鴻�⓾�� I/O ��勉�������í�˨����勉��絮ゃ��("layer") (��������c�激����ŝ�潟��"disciplines"��������若�違����障��)���絎h���������������� ��ゃ�潟�帥�若����с�若�鴻�勌����ゃ�������☗�������障����� 篋���ゃ�勐����違�������� open()���readpipe()(��障����� qx//) ������罕���勖��膊�絖���壔�� �����勉�㋘�㏍�激�˨�˨�鴻�潟�若����с����勉����í�違�����荀���ゃ�����������絎h�������������������í�˨����� 篏睡�������障����� 筝���ゃ�勐����違�������� open ��с��������MODE ��� IO 絮ゃ�����絎���������⓾����ŝ����翫����� �����勉����í�違����勐襲��帥����������障�����
IN
��泣�������í�違�����篏帥�c�☗�ュ����鴻����ŝ�若����勉�������í�˨��絮ゃ��絎h����с����� OUT
��泣�������í�違�����篏帥�c�☗�阪����鴻����ŝ�若����勉�������í�˨��絮ゃ�� 絎h����с����障����� IO
��泣�������í�違�����篏帥�c�☗�ュ�阪����勌検��鴻�������������九勝��с����障�����
��㋘�㋘�激�若����潟�潟�若����c�潟�違��篏帥�c�⓾�������勉�ŝ�����:encoding(...)
��帥�違�� 篏帥����障�����
��㏍�宴�若�˨�̹�≪�������医��紊���違����冴�ャ����⓾����潟�潟�若����c�潟�医韻���荐㊤�������������翫����� :locale
��帥�違��篏帥����障����� 箴�������:
$ENV{LANG} = 'ru_RU.KOI8-R';
# the :locale will probe the locale environment variables like LANG
use open OUT => ':locale';
open(O, ">koi8");
print O chr(0x430); # Unicode CYRILLIC SMALL LETTER A = KOI8-R 0xc1
close O;
open(I, "<koi8");
printf "%#x\n", ord(<I>), "\n"; # this should print 0xc1
close I;
篁ヤ����� 2 茵���夌��箴<�с��:
use open ':encoding(utf8)';
use open IO => ':encoding(utf8)';
���罕���˨��篁ヤ����� 2 茵�
use open ':locale';
use open IO => ':locale';
���篁ヤ����� 2 茵�
use open ':encoding(iso-8859-7)';
use open IO => ':encoding(iso-8859-7)';
���膈�箴<�с�����
�����潟�潟�若����c�潟�医����勉����������潟�違�夌粂��������ŝ����勉�с��: 紊у�����絖���勰������� ��∴�����������紊������勉����潟�潟�若����c�潟�違�壔�������ゃ����勐�ュ����������c�⓾����障����� 絲上�������⓾�������㏍�宴�若�˨�勉�ŝ�鴻����◑¼膣違�� Encode::Supported ��� �����с����⓾��������������
open() ���絮ゃ�勉�ŝ�鴻�����(3 綣���井��羈����)筝���������������翫���������������� �����勉����í�違�����篏帥�c�☗㐂荐������������ŝ�鴻�����筝���吾�������障�����
:std
��泣�������í�違����������ʃ昆��壚����勐�号����������<�障�����������:utf8
��� :encoding
��������c����泣�������í�違����◐����水�������������翫����˨�壔�� 罔�羣������<�ゃ�˨����潟�����(STDIN, STDOUT, STDERR)��������御�������������ュ�阪�������潟����˨� �����潟�潟�若����c�潟�違��紊���������障����� �����������違����ュ�������阪����勌検��鴻�� :encoding(utf8)
�����御����������翫����� :std
��� STDIN, STDOUT, STDERR �����障�� :encoding(utf8)
�����ŝ����������������潟����障����� 筝���鴻����阪����������� :encoding(koi8r)
��◒�御����������翫����˨�壔�� :std
��� STDOUT ��� STDERR ��������� koi8r
��˨����障����� :locale
��泣�������í�違����壩��藥���勉����<�� :std
��������鴻�˨����障�����
:locale
��勉�㏍�吾����壔�� encoding ���絎������̬��菴違�������⓾����障�������� ��㏍�頥������������障�� nl_langinfo(CODESET) ���荅⓾����⓾�������勐�� LC_ALL ��� LANG ��勉�㏍�宴�若�̥�医��紊���違������ィ羝㋘����障�����
�����c�㋘�壔����ŝ����潟����˨��絨���� PerlIO 絮ゃ����泣����若����������с�����������
(��� PerlIO 罘����)
Perl ��������� IO ��激�鴻�������������� PerlIO ���篏帥�����������罕�膀���������⓾����ŝ����c����翫����� :bytes
��� :crlf
��勌����ゃ�勖�㋙室絮ゃ��������篏睡���櫝�純�с�����
:bytes
絮ゃ�壔�������ゃ����ŝ�≪�若�����������:crlf
絮ゃ�壔�������㏍�鴻����≪�若����������� �����<�ゃ�˨����ŝ�若����潟�������������˨��������篋���ゃ�勉�≪�若�������阪�ャ�����(Windows ��� ��˨�����紊������� DOS ��˩室�����激�鴻�����) �����í����������í�若����˨�������☀;�����障����� ���������篋���ゃ�勐韻��� binmode() ���篏����茵������ŝ�������í����������í�若����с�壚����� 茵������障�����������PerlIO ��������鴻�с�������翫����˨�壔����������勰�∽�違�壔����鴻�⓾�勐�贋���� ���篏������障�����
(絎�茖���勤¼膣�)
PerlIO::Layer
��˨��XS ��潟�若����у��茖���������� find
��������� ��壔�í�鴻�<�純����������������障����� ��������壠韻��勛∈茯���勉�������� import
��˨����c�☗�若�喝�冴�������障��:
PerlIO::Layer::->find("perlio")
菴������ゃ�壔��(������絎�臂í�������⓾��������) perlio.c ��� C �����㏍�違�í����˨����c� 篏������������� PerlIO::Layer
��壔�í�鴻�� Perl ��ŝ����吾�с�壔����с����� perl ��㋘����˨�с�夌憜����勉�����������������篏帥�c�☖�����箴水�í�ŝ�������� ��с�������������с�壔�������障��������
"binmode" in perlfunc, "open" in perlfunc, perlunicode, PerlIO, encoding