765 lines
43 KiB
Plaintext
765 lines
43 KiB
Plaintext
|
Shift-JIS<49>e<EFBFBD>L<EFBFBD>X<EFBFBD>g<EFBFBD>𐳂<EFBFBD><F090B382><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD>ŋ߂̍X<EFBFBD>V<EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
2005-03-26: <20>u<EFBFBD>ŏ<EFBFBD><C58F>Ɂv<C981><76><EFBFBD>AXML<4D><4C><EFBFBD>{<7B><><EFBFBD>v<EFBFBD><76><EFBFBD>t<EFBFBD>@<40>C<EFBFBD><43><EFBFBD><EFBFBD>2<EFBFBD>łɊ<C582><C98A>Â<EFBFBD><C382>A<EFBFBD><EFBFBD>NjL<C78B>B
|
|||
|
2005-03-09: <20>u<EFBFBD>ŏ<EFBFBD><C58F>Ɂv<C981><76><EFBFBD>A<EFBFBD><41><EFBFBD>͂<EFBFBD><CD82><EFBFBD>C<EFBFBD><43><EFBFBD>B
|
|||
|
2003-06-24: Shift-JIS<49>̊<EFBFBD><CC8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂ރt<DE83>@<40>C<EFBFBD><43><EFBFBD><EFBFBD>/<2F>p<EFBFBD>X<EFBFBD><58>
|
|||
|
2003-05-31: <20>u<EFBFBD>ŏ<EFBFBD><C58F>Ɂv<C981><76><EFBFBD>A<EFBFBD>u<EFBFBD>V<EFBFBD>t<EFBFBD>gJIS<49>v<EFBFBD>Ȃǂ̕\<5C>L<EFBFBD>ɂ<C982><C282>āB
|
|||
|
2003-05-24: CP932<33>d<EFBFBD><64><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>̕ϊ<CC95>
|
|||
|
2002-08-30: Perl 5.8.0 <20>ɂ<C982><C282>āB
|
|||
|
2002-01-17: <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɑ<C991><CE82>鐳<EFBFBD>K<EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
2001-12-15: ShiftJIS::Collate <20><> overrideCJK <20>p<EFBFBD><70><EFBFBD><EFBFBD><EFBFBD>[<5B>^<5E><><EFBFBD>p<EFBFBD>~<7E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃɔ<C682><C994><EFBFBD> <20><><EFBFBD>{<7B>ꕶ<EFBFBD><EA95B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ёւ<D191><D682><EFBFBD><EFBFBD>̏<EFBFBD><CC8F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>ŏ<EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>肪<EFBFBD><EFBFBD><EFBFBD>ȃG<EFBFBD><EFBFBD><EFBFBD>[
|
|||
|
<EFBFBD>G<EFBFBD><EFBFBD><EFBFBD>[<5B><><EFBFBD>ԈႢ<D488><E182A2><EFBFBD>h<EFBFBD><68><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>e<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̍<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>\<5C><><EFBFBD>ƃ}<7D>b<EFBFBD>`
|
|||
|
<EFBFBD>O<EFBFBD><EFBFBD><EFBFBD>[<5B>o<EFBFBD><6F><EFBFBD>}<7D>b<EFBFBD>`
|
|||
|
<EFBFBD>A<EFBFBD><EFBFBD><EFBFBD>t<EFBFBD>@<40>x<EFBFBD>b<EFBFBD>g<EFBFBD>̑啶<CC91><E595B6><EFBFBD>Ə<EFBFBD><C68F><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɑ<EFBFBD><EFBFBD>鐳<EFBFBD>K<EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD>O<EFBFBD><EFBFBD><EFBFBD>̕ϊ<EFBFBD>
|
|||
|
CP932<EFBFBD>d<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>̕ϊ<CC95>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>𐔂<EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>P<EFBFBD>ʂɕ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>낢<EFBFBD><EFBFBD><EFBFBD>ȕ<EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ő肻<EFBFBD>낦<EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>{<7B>ꕶ<EFBFBD><EA95B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ёւ<D191><D682><EFBFBD>
|
|||
|
Shift-JIS<49>̊<EFBFBD><CC8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂ރt<DE83>@<40>C<EFBFBD><43><EFBFBD><EFBFBD>/<2F>p<EFBFBD>X<EFBFBD><58>
|
|||
|
<EFBFBD>ŏ<EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>{<7B><><EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h<EFBFBD>ɂ͂<C982><CD82><EFBFBD><EFBFBD><EFBFBD><C282>̂<EFBFBD><CC82>̂<EFBFBD><CC82>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>x<EFBFBD><78><EFBFBD>ʓI<CA93>Ȃ<EFBFBD><C882>̂Ȃ<CC82><C882>A<EFBFBD>ǂ<EFBFBD><C782><EFBFBD><EFBFBD>g<EFBFBD><67><EFBFBD>Ă<EFBFBD><C482>悢<EFBFBD>ł<EFBFBD><C582>傤<EFBFBD>i<EFBFBD>ǂ̕<C782><CC95><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h<EFBFBD>ŕ<EFBFBD><C595><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>邩<EFBFBD>̏<EFBFBD><CC8F><EFBFBD><F182AA8E><EFBFBD><EFBFBD>ꂳ<EFBFBD><EA82B3><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>j<CE81>B
|
|||
|
<EFBFBD>Ⴆ<EFBFBD>A<EFBFBD><EFBFBD><EFBFBD>{<7B><><EFBFBD><EFBFBD>Windows<77>ł́A<CD81><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD>DOS<4F><53><EFBFBD>ł<EFBFBD>Shift-JIS<49><53><EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ꍇ<EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>̓r<CC93><72><EFBFBD>ł킴<C582>킴EUC-JP<4A><50>UTF-8<>ɕϊ<C995><CF8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʓ|<7C>ł<EFBFBD><C582>B<EFBFBD>f<EFBFBD>o<EFBFBD>b<EFBFBD>O<EFBFBD>̂Ƃ<CC82><C682>A<EFBFBD>u<EFBFBD><75><EFBFBD>̒i<CC92>K<EFBFBD>ł͂<C582><CD82>̕ϐ<CC95><CF90>ɂ͉<C982><CD89><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>̂<EFBFBD><CC82>v<EFBFBD>o<EFBFBD>͂<EFBFBD><CD82>ē_<C493><5F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂͂悭<CD82>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>̂Ƃ<CC82>EUC-JP<4A>Ƃ<EFBFBD><C682>Ď<EFBFBD><C48E>߂<EFBFBD><DF82><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>Ƃ͎<C682><CD8E>Ԃǂ<D482><C782>ł<EFBFBD><C582>傤<EFBFBD>B<EFBFBD><42><EFBFBD>͂<EFBFBD><CD82>o<EFBFBD>͂<EFBFBD>Shift-JIS<49>ōs<C58D><73><EFBFBD><EFBFBD><C282><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>̑S<CC91>̂<EFBFBD>Shift-JIS<49>̂܂܈<DC82><DC88><EFBFBD><EFBFBD><EFBFBD><EFBFBD>炫<EFBFBD><E782AB><EFBFBD>ƕ֗<C695><D697>ł<EFBFBD><C582>傤<EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>F "<22>V<EFBFBD>t<EFBFBD>gJIS", "Shift_JIS", "Shift-JIS" <20>Ȃǂ̕\<5C>L<EFBFBD>̈Ⴂ<CC88>ɂ<C982><C282>Ă͂悭<CD82>킩<EFBFBD><ED82A9><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD>̂Ƃ<CC82><C682>땪<EFBFBD><EB95AA><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>邱<EFBFBD>Ƃ́F
|
|||
|
JIS X 0208:1997<39>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD>1<EFBFBD>i<EFBFBD>V<EFBFBD>t<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<5C><><EFBFBD>j<EFBFBD>ɂ́A<CD81>u<EFBFBD>Q<EFBFBD>l<EFBFBD>v<EFBFBD>Ƃ<EFBFBD><C682>āu<C481><75><EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<5C><><EFBFBD>͒ʏ<CD92><CA8F>g<EFBFBD>V<EFBFBD>t<EFBFBD>gJIS<49>R<EFBFBD>[<5B>h<EFBFBD>h<EFBFBD>ƌĂ<C482><CE82>Ă<EFBFBD><C482><EFBFBD><EFBFBD>v<EFBFBD>̋L<CC8B>q<EFBFBD><71><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
IANA <20><> CHARACTER SETS <20>ɂ́AShift_JIS <20><> Windows-31J <20>Ƃ<EFBFBD><C682>ʂɓo<C993>^<5E><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>B<EFBFBD>܂<EFBFBD><DC82>AShift_JIS<49>ɂ<C982><C282>āA<C481>uCCS<43>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>W<EFBFBD><57><EFBFBD>j<EFBFBD><6A>JIS X0201:1997<39><37>JIS X0208:1997<39>ł<EFBFBD><C582><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>S<EFBFBD>Ȓ<EFBFBD><C892>`<60><>JIS X 0208:1997<39>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD>1<EFBFBD>Ɏ<EFBFBD><C98E><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>B<EFBFBD>v<EFBFBD>ƋL<C68B><4C><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>B
|
|||
|
W3C <20><> XML Japanese Profile <20>ɂ́AShift-JIS<49><53>Unicode<64>ւ̕ϊ<CC95><CF8A>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>|<7C>̋L<CC8B>ڂ<EFBFBD><DA82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>BXML Japanese Profile (Second Edition)<29>ł́AUnicode Consortium<75>Ō<EFBFBD><C58C>J<EFBFBD><4A><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD>Microsoft CP932<33>̕ϊ<CC95><CF8A>\<5C>ɂ<EFBFBD><C982><EFBFBD>charset<65>̖<EFBFBD><CC96><EFBFBD> "x-sjis-cp932" <20><> "Windows-31J" <20>ɕύX<CF8D><58><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>B
|
|||
|
Microsoft<EFBFBD>Ђ<EFBFBD> Global Dev <20>ł́ACodepage 932 <20><> "Japanese Shift-JIS" <20>ƒ<EFBFBD><C692>L<EFBFBD><4C><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>AShift-JIS<49>ɂ͂<C982><CD82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̕Ȃ<CC95><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD>āA<C481><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>o<EFBFBD>O<EFBFBD><4F><EFBFBD>G<EFBFBD><47><EFBFBD>[<5B>╶<EFBFBD><E295B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̌<EFBFBD><CC8C><EFBFBD><EFBFBD>ƂȂ<C682><C882>܂<EFBFBD><DC82>B<EFBFBD>Ȃ<EFBFBD><C882>Ƃ<EFBFBD><C682>Ȃ<EFBFBD><C882>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>̂ł<CC82><C582>傤<EFBFBD><E582A4><EFBFBD>B
|
|||
|
Perl<EFBFBD>͐<EFBFBD><EFBFBD>䕶<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂ރo<EFBFBD>C<EFBFBD>i<EFBFBD><EFBFBD><EFBFBD>f<EFBFBD>[<5B>^<5E>ł<EFBFBD><C582>琳<EFBFBD><E790B3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>悤<EFBFBD>ɐv<DD8C><76><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>̂ŁA<C581>X<EFBFBD>N<EFBFBD><4E><EFBFBD>v<EFBFBD>g<EFBFBD><67><EFBFBD>e<EFBFBD>L<EFBFBD>X<EFBFBD>g<EFBFBD><67>Shift-JIS<49>ŏ<EFBFBD><C58F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>炢<EFBFBD>Ŗ<EFBFBD><C596><EFBFBD><EFBFBD>ɂȂ邱<C882>Ƃ͂<C682><CD82><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Aperl<EFBFBD><EFBFBD><EFBFBD>X<EFBFBD>N<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD>g<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>߂<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><EFBFBD>́i<EFBFBD>ʏ<EFBFBD><EFBFBD>j<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD>P<EFBFBD>ʂŒ<EFBFBD><EFBFBD>ׂ<EFBFBD><EFBFBD>̂ŁAShift-JIS<49>̂悤<CC82>ȃ}<7D><><EFBFBD>`<60>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂ޕ<DC82><DE95><EFBFBD><EFBFBD>͂<EFBFBD><CD82>̂܂܂ł͒<C582><CD92>ڗ<EFBFBD><DA97><EFBFBD><EFBFBD>ł<EFBFBD><C582>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><EFBFBD>AShift-JIS<49><53> '<27><>' <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A16<31>i<EFBFBD><69><EFBFBD><EFBFBD>82 A0<41>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD>ŕ\<5C><><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD> "\x82\xA0" <20>Ə<EFBFBD><C68F><EFBFBD><EFBFBD>Ă<EFBFBD>perl<72>ɂƂ<C982><C682>Ă͓<C482><CD93><EFBFBD><EFBFBD>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD>ꂪ<EFBFBD><EA82AA><EFBFBD>{<7B>́icountry<72>j<EFBFBD><6A><EFBFBD>{<7B><><EFBFBD>́ilanguage<67>j<EFBFBD><6A><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>AShift-JIS<49>ŏ<EFBFBD><C58F><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>icharset<65>j<EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͂ǂ<CD82><C782>ɂ<EFBFBD><C982>܂܂<DC82><DC82>Ă<EFBFBD><C482>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><EFBFBD>߁AShift-JIS<49>ŏ<EFBFBD><C58F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ɂ́Aperl<72>̌<EFBFBD><CC8C><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<F382AF82><C882>悤<EFBFBD>ɏ<EFBFBD><C98F><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ȃ<CE82><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD>̔z<CC94><7A><EFBFBD>́A<CD81>v<EFBFBD><76><EFBFBD>O<EFBFBD><4F><EFBFBD>}<7D><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ȃ<CE82><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD>̋L<CC8B>q<EFBFBD>́A<CD81><41><EFBFBD>̂悤<CC82>Ȏ<EFBFBD><C88E>Ԃ<EFBFBD><D482><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>AShift-JIS<49><53><EFBFBD>p<EFBFBD><70><EFBFBD>邱<EFBFBD>ƂɈӋ`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƍl<C68D><6C><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>l<EFBFBD>ɂ͎Q<CD8E>l<EFBFBD>ɂȂ邩<C882><E982A9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȏ<EFBFBD><EFBFBD>Ԃ<EFBFBD><EFBFBD>|<7C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>l<EFBFBD>́A
|
|||
|
Perl 5.8.x<>ȍ~<7E><><EFBFBD>g<EFBFBD><67><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>_<EFBFBD>Fperl5-porters@perl.org <20>ŃT<C583>|<7C>[<5B>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>_<EFBFBD>F<EFBFBD>Ɠ<EFBFBD><EFBFBD>̍l<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>]<5D><><EFBFBD>̓<EFBFBD><CC93>{<7B>ꏈ<EFBFBD><EA8F88><EFBFBD>Ƃ͑<C682><CD91>e<EFBFBD><65><EFBFBD>Ȃ<EFBFBD><C882>Ƃ<EFBFBD><C682>낪<EFBFBD><EB82AA><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>A<EFBFBD><41><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ċC<C48B>ɂȂ<C982><C882>Ȃ<EFBFBD><C882>Ȃ邩<C882><E982A9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>j<EFBFBD>B
|
|||
|
jperl<EFBFBD><EFBFBD><EFBFBD>g<EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>_<EFBFBD>FShift-JIS <20><EFBFBD><F095B68E>Ƃ<EFBFBD><C682>Ē<EFBFBD><C492>ڈ<EFBFBD><DA88><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ł<EFBFBD><C582><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>_<EFBFBD>F<EFBFBD><EFBFBD><EFBFBD>݁A<EFBFBD>ێ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>l<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h<EFBFBD><68>UTF-8<><38>EUC-JP<4A>ɕϊ<C995><CF8A><EFBFBD><EFBFBD>Ă<EFBFBD><C482>珈<EFBFBD><E78F88><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>_<EFBFBD>FPerl 5.8.x<>ȍ~<7E>łȂ<C582><C882>Ă<EFBFBD><C482><EFBFBD><EFBFBD>삷<EFBFBD><EC82B7><EFBFBD>ϊ<EFBFBD><CF8A>p<EFBFBD>̃<EFBFBD><CC83>W<EFBFBD><57><EFBFBD>[<5B><>(.pm)<29><EFBFBD>C<EFBFBD>u<EFBFBD><75><EFBFBD><EFBFBD>(.pl)<29><><EFBFBD><EFBFBD><EFBFBD>낢<EFBFBD><EB82A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<5C>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>_<EFBFBD>FShift-JIS<49>قLj<D982><C788><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>ɂ<EFBFBD><C982>Ă<EFBFBD><C482>A<EFBFBD>}<7D><><EFBFBD>`<60>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>V<EFBFBD><56><EFBFBD>O<EFBFBD><4F><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ƌ<EFBFBD><C68B>ʂ<EFBFBD><CA82><EFBFBD><EFBFBD>A<EFBFBD>Ƃ<EFBFBD><C682>Ɉꕶ<C988><EA95B6><EFBFBD>Ƃ<EFBFBD><C682>ď<EFBFBD><C48F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͖̂ʓ|<7C>ł<EFBFBD><C582><EFBFBD><EFBFBD>B
|
|||
|
<20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>Ώ<EFBFBD><CE8F><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>ق<EFBFBD><D982><EFBFBD><EFBFBD>悢<EFBFBD>ł<EFBFBD><C582>傤<EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̃v<CC83><76><EFBFBD>O<EFBFBD><4F><EFBFBD><EFBFBD><EFBFBD>͗L<CD97><4C><EFBFBD>Ȃ̂ŁA<C581>T<EFBFBD><54><EFBFBD><EFBFBD><CE82><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><C282><EFBFBD><EFBFBD>ł<EFBFBD><C582>傤<EFBFBD><E582A4><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͂<EFBFBD><CD82><EFBFBD><EFBFBD>ɂ͎<C982><CD8E><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>Ȃ<EFBFBD><EFBFBD>A<EFBFBD><EFBFBD><EFBFBD>̕<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɏ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><EFBFBD>鎖<EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>ł<EFBFBD><EFBFBD><EFBFBD><EFBFBD>߂<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>@<40>Ȃ̂ŁA<C581><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A<CD81><41><EFBFBD>̂<CC82><C282><EFBFBD><EFBFBD>ł<EFBFBD><C582>ǂ݉<C782><DD89><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD>̕<EFBFBD><CC95>@<40>ɂ<C982><C282>ĉ<EFBFBD><C489><EFBFBD><EFBFBD>^<5E>₪<EFBFBD><E282AA><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>Ă<EFBFBD><C482>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>ɂ<C982><C282>đ<EFBFBD><C491>̂Ƃ<CC82><C682><EFBFBD><EFBFBD>Ŏ<EFBFBD><C58E>₷<EFBFBD><E282B7><EFBFBD>ƁA<C681><41><EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>̂<EFBFBD><CC82>ƁA<C681><41><EFBFBD><EFBFBD><EFBFBD>Ɣ<EFBFBD><C694><EFBFBD><EF82B3><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>傤<EFBFBD>B<EFBFBD><42><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>āA<C481><41><EFBFBD>ɂ<EFBFBD><C982>u<EFBFBD><75><EFBFBD>Ȃ<EFBFBD><C882>ʼn<EFBFBD><C589><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
Shift-JIS<49><53><EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ɂ<EFBFBD><C982>肪<EFBFBD><E882AA><EFBFBD>ȁi<C881>H<EFBFBD>j<EFBFBD>G<EFBFBD><47><EFBFBD>[
|
|||
|
Shift-JIS<49>ɂ́A<CD81><41><EFBFBD>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> [@-~]<5D>iASCII 10<31>i<EFBFBD><69><EFBFBD><EFBFBD>64-126<32>j<EFBFBD>͈̔͂ɓ<CD82><C993><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ASCII<49><49><EFBFBD><EFBFBD><EFBFBD>́Aperl<72>ɂƂ<C982><C682>ē<EFBFBD><C493>ʂȈӖ<C888><D396><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><C282>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>邽<EFBFBD>߁A<DF81><41><EFBFBD><EFBFBD><CE82>G<CE83><47><EFBFBD>[<5B>̌<EFBFBD><CC8C><EFBFBD><EFBFBD>ƂȂ<C682><C882>܂<EFBFBD><DC82>BShift-JIS<49>ł́A<CD81>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̑<EFBFBD><CC91>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD>́A[\x40-\x7E\x80-\xFC])<29>͈̔͂ɂ<CD82><C982>邽<EFBFBD>߁A<DF81><41><EFBFBD><EFBFBD>188<38><38><EFBFBD><EFBFBD>63<36>A<EFBFBD><41><EFBFBD>R<EFBFBD><52><EFBFBD>̂P<CC82>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>炩<EFBFBD>̖<EFBFBD><CC96><EFBFBD><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>ɁAShift-JIS<49><53><EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ɋN<C98B><4E><EFBFBD>肪<EFBFBD><E882AA><EFBFBD>ȃG<C883><47><EFBFBD>[<5B>Ƃ<EFBFBD><C682>̌<EFBFBD><CC8C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>G<EFBFBD><47><EFBFBD>[<5B><><EFBFBD>b<EFBFBD>Z<EFBFBD>[<5B>W<EFBFBD><57>perl<72>̈Ⴂ<CC88>i<EFBFBD>o<EFBFBD>[<5B>W<EFBFBD><57><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ǂ̃v<CC83><76><EFBFBD>b<EFBFBD>g<EFBFBD>t<EFBFBD>H<EFBFBD>[<5B><><EFBFBD>p<EFBFBD>̂<EFBFBD><CC82>̂ł<CC82><C582>邩<EFBFBD><E982A9><EFBFBD>j<EFBFBD>ɂ<EFBFBD><C982>葽<EFBFBD><E891BD><EFBFBD>̈Ⴂ<CC88><E182A2><EFBFBD><EFBFBD><EFBFBD>邩<EFBFBD><E982A9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>G<EFBFBD><EFBFBD><EFBFBD>[<5B>ɂȂ<C982><C882>Ȃ<EFBFBD><C882>Ă<EFBFBD><C482>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>҂<EFBFBD><D282><EFBFBD><EFBFBD>悤<EFBFBD>ȓ<EFBFBD><C893><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ŁA<C581><41><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>̏ꍇ<CC8F>A<EFBFBD>G<EFBFBD><47><EFBFBD>[<5B><><EFBFBD>o<EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ŒT<C592><54><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ȃ<CE82><C882>Ȃ<EFBFBD><C882>Ȃ邽<C882>߃o<DF83>O<EFBFBD><4F><EFBFBD><EFBFBD><EFBFBD>͂<EFBFBD><CD82><EFBFBD><CE82><EFBFBD><CE8D><EFBFBD><EFBFBD>ł<EFBFBD><C582>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł̓G<EFBFBD><EFBFBD><EFBFBD>[<5B>ɑ<C991><CE82><EFBFBD><EFBFBD><EFBFBD><CE8D>͒<CD92><F18EA682>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><EFBFBD><CE8D>͂<EFBFBD><CD82>Ƃł܂Ƃ߂ď<DF82><C48F><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>Ȃ<EFBFBD><EFBFBD>A<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɂ͕<EFBFBD><EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h<EFBFBD><68>EUC-JP<4A>ɂ<EFBFBD><C982>Ă<EFBFBD><C482>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>悤<EFBFBD>Ȗ<EFBFBD><C896><EFBFBD><EFBFBD><EFBFBD><EFBFBD>G<EFBFBD><47><EFBFBD>[<5B>͎<EFBFBD><CD8E><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD>{<7B>I<EFBFBD>ɁAEUC-JP<4A>Ȃ<EFBFBD><C882>N<EFBFBD><4E><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>AShift-JIS<49>̂Ƃ<CC82><C682>ɂ͋N<CD8B><4E><EFBFBD><EFBFBD><EFBFBD>悤<EFBFBD>Ȏ<EFBFBD><C88E><EFBFBD><EFBFBD>Ɍ<EFBFBD><C98C><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>G<EFBFBD><EFBFBD><EFBFBD>[<5B>ɂ͂Ȃ<CD82><C882>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ǖ<EFBFBD><C795><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>P<EFBFBD>j
|
|||
|
<EFBFBD>Ⴆ<EFBFBD>A"<22>\<5C><>" <20>Ƃ<EFBFBD> "<22>\<5C><>" <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> "<22><><EFBFBD>" <20>Ƃ<EFBFBD> "<22><><EFBFBD>" <20>ɂȂ<C982><C882>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>́A"<22>\" <20><> "<22>\"<22>̕<EFBFBD><CC95><EFBFBD><EFBFBD>̑<EFBFBD><CC91>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> \ <20>ł<EFBFBD><C582>邽<EFBFBD>߁A<DF81>_<EFBFBD>u<EFBFBD><75><EFBFBD>N<EFBFBD>I<EFBFBD>[<5B>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><CC92>ł͎<C582><CD8E>̕<EFBFBD><CC95><EFBFBD><EFBFBD>̃G<CC83>X<EFBFBD>P<EFBFBD>[<5B>v<EFBFBD><76><EFBFBD><EFBFBD><EFBFBD>邱<EFBFBD>ƂɂȂ<C982><C882>̂ŁA<C581>\<5C><> <20><> 0x955C8EA6 <20>ł<EFBFBD><C582><EFBFBD><EFBFBD>Ă<EFBFBD><C482>A<EFBFBD>N<EFBFBD>I<EFBFBD>[<5B>g<EFBFBD>̌<EFBFBD><CC8C>ʂ<EFBFBD> "<22>\<5C><>" <20><> 0x958EA6 <20>ƂȂ邩<C882><E982A9><EFBFBD>ł<EFBFBD><C582>B'<27>\<5C><>' <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>Ε<EFBFBD><CE95><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͋N<CD8B><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>A<F182AA81>V<EFBFBD><56><EFBFBD>O<EFBFBD><4F><EFBFBD>N<EFBFBD>I<EFBFBD>[<5B>g<EFBFBD>ł<EFBFBD><C582>h<EFBFBD><68><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>G<EFBFBD><47><EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD>j<EFBFBD>B
|
|||
|
<EFBFBD>G<EFBFBD><EFBFBD><EFBFBD>[<5B>ɂ͂Ȃ<CD82><C882>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ǖ<EFBFBD><C795><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>Q<EFBFBD>j
|
|||
|
<EFBFBD>Ⴆ<EFBFBD>A"<22>~<7E>\\500" <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD>ł́A\ <20><><EFBFBD>E<EFBFBD><45><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>́A'<27>~<7E>\\500' <20><> q(<28>~<7E>\\500) <20>ȂǂƂ<C782><C682>Ă<EFBFBD><C482>h<EFBFBD><68><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ł<EFBFBD><C582>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD> \\ <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> \ <20>P<EFBFBD>ɂȂ<C982><C882>Ă<EFBFBD><C482>܂<EFBFBD><DC82>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>K<EFBFBD><4B><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>邩<EFBFBD><E982A9><EFBFBD>ł<EFBFBD><C582>B
|
|||
|
<EFBFBD>N<EFBFBD>I<EFBFBD>[<5B>g<EFBFBD><67><EFBFBD>N<EFBFBD>I<EFBFBD>[<5B>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Z<EFBFBD>q<EFBFBD>̒<EFBFBD><CC92>ł́A<CD81><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɃN<C983>I<EFBFBD>[<5B>g<EFBFBD>Ɠ<EFBFBD><C693><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂߂<DC82><DF82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>悤<EFBFBD>ɁA\ <20>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>G<EFBFBD>X<EFBFBD>P<EFBFBD>[<5B>v<EFBFBD><76><EFBFBD>t<EFBFBD><74><EFBFBD><EFBFBD><EFBFBD>N<CE83>I<EFBFBD>[<5B>g<EFBFBD>̏I<CC8F>[<5B><><EFBFBD><EFBFBD><EFBFBD>ł͂Ȃ<CD82><C882>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̈ꕔ<CC88>Ƃ݂Ȃ<DD82><C882>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>̂<EFBFBD><CC82>߁A\\ <20><> \ <20>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<5C><><EFBFBD>G<EFBFBD>X<EFBFBD>P<EFBFBD>[<5B>v<EFBFBD>ɂȂ<C982><C882>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>̓N<CD83>I<EFBFBD>[<5B>g<EFBFBD>̎n<CC8E>[<5B>E<EFBFBD>I<EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɂ<EFBFBD><C982>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃł<C682><C582>B
|
|||
|
<EFBFBD>G<EFBFBD><EFBFBD><EFBFBD>[<5B>ɂ͂Ȃ<CD82><C882>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ǖ<EFBFBD><C795><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>R<EFBFBD>j
|
|||
|
<EFBFBD>Ⴆ<EFBFBD>A"<22>ۏ\net" <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD> "<22>ۥ
|
|||
|
et" <20>̂悤<CC82>ɓr<C993><72><EFBFBD>ʼn<EFBFBD><C589>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>́A"<22>\" <20>̑<EFBFBD><CC91>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> \ <20>ł<EFBFBD><C582>邽<EFBFBD>߁A<DF81>_<EFBFBD>u<EFBFBD><75><EFBFBD>N<EFBFBD>I<EFBFBD>[<5B>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><CC92>ł͎<C582><CD8E><EFBFBD> 'n' <20>ƍ<EFBFBD><C68D>킹<EFBFBD><ED82B9>\n<>̂<EFBFBD><CC82>Ȃ킿<C882><ED82BF><EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD>^<5E><><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ĉ<EFBFBD><C489>߂<EFBFBD><DF82><EFBFBD><EFBFBD>邩<EFBFBD><E982A9><EFBFBD>ł<EFBFBD><C582>B
|
|||
|
<EFBFBD>G<EFBFBD><EFBFBD><EFBFBD>[<5B>ɂ͂Ȃ<CD82><C882>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ǖ<EFBFBD><C795><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>S<EFBFBD>j
|
|||
|
<EFBFBD>Ⴆ<EFBFBD>A"<22><><EFBFBD><EFBFBD><EFBFBD>@ARGV" <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>́A"<22>@"<22>i<EFBFBD>S<EFBFBD>p<EFBFBD>X<EFBFBD>y<EFBFBD>[<5B>X<EFBFBD>j<EFBFBD>̑<EFBFBD><CC91>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> @ <20>ł<EFBFBD><C582>邽<EFBFBD>߁A<DF81>_<EFBFBD>u<EFBFBD><75><EFBFBD>N<EFBFBD>I<EFBFBD>[<5B>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><CC92>ł͎<C582><CD8E><EFBFBD> ARGV <20>ƍ<EFBFBD><C68D>킹<EFBFBD><ED82B9> "@ARGV" <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>z<EFBFBD><7A><EFBFBD>Ƃ<EFBFBD><C682>ĕϐ<C495><CF90>W<EFBFBD>J<EFBFBD><4A><EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>B@ARGV<47>̂悤<CC82>ɕK<C995><4B><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>悤<EFBFBD>Ȕz<C894><7A><EFBFBD>Ȃ<EFBFBD><C882>A<EFBFBD>W<EFBFBD>J<EFBFBD><4A><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>A<EFBFBD>ʂ̏ꍇ<CC8F>ł̓G<CD83><47><EFBFBD>[<5B>ɂȂ邩<C882><E982A9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD>͎<EFBFBD><CD8E><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Q<EFBFBD>Ɓj<C681>B
|
|||
|
In string, @dog now must be written as \@dog (Perl 5.6.0<EFBFBD>܂<EFBFBD>)
|
|||
|
<EFBFBD>u<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><EFBFBD>ł́A@dog<6F>͍<EFBFBD><CD8D><EFBFBD>\@dog<6F>Ə<EFBFBD><C68F><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ȃ<CE82><C882>Ȃ<EFBFBD><C882>v
|
|||
|
<EFBFBD>O<EFBFBD><EFBFBD><EFBFBD>ł݂<EFBFBD><EFBFBD>悤<EFBFBD>ɁA<EFBFBD>S<EFBFBD>p<EFBFBD>X<EFBFBD>y<EFBFBD>[<5B>X "<22>@"<22>̑<EFBFBD><CC91>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> @ <20>ł<EFBFBD><C582>邽<EFBFBD>߁A<DF81><41><EFBFBD><EFBFBD><EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD>ƍ<EFBFBD><C68D>킹<EFBFBD>Ĕz<C494><7A><EFBFBD>ł<EFBFBD><C582>邩<EFBFBD>̂悤<CC82>ɉ<EFBFBD><C989>߂<EFBFBD><DF82>悤<EFBFBD>Ƃ<EFBFBD><C682>܂<EFBFBD><DC82>B"<22><><EFBFBD>@dog" <20>̂悤<CC82>ȏꍇ<C88F>A@dog <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>z<EFBFBD><EFBFBD><F182AA92>`<60><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><CE82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>p<EFBFBD><70><EFBFBD>ĕϐ<C495><CF90>W<EFBFBD>J<EFBFBD><4A><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>Ȃ<EFBFBD><C882>ꍇ<EFBFBD>A<EFBFBD>G<EFBFBD><47><EFBFBD>[<5B><><EFBFBD>b<EFBFBD>Z<EFBFBD>[<5B>W<EFBFBD><57><EFBFBD>o<EFBFBD><6F><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
``now must be written as''<27>u<EFBFBD><75><EFBFBD>͂<EFBFBD><CD82><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ȃ<CE82><C882>Ȃ<EFBFBD><C882>v<EFBFBD>Ƃ́APerl4<6C>܂ł͔z<CD94><7A><EFBFBD>̕ϐ<CC95><CF90>W<EFBFBD>J<EFBFBD>͍s<CD8D><73><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>߁A"hoge@foo.bar" <20>̂悤<CC82>ȏ<EFBFBD><C88F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>邱<EFBFBD>Ƃ<EFBFBD><C682>ł<EFBFBD><C582><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>A<EFBFBD><41> Perl<72>ł<EFBFBD> @foo <20><><EFBFBD>W<EFBFBD>J<EFBFBD><4A><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>̂ŁA<C581><41><EFBFBD>ӂ<EFBFBD><D382><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD>邽<EFBFBD>߃G<DF83><47><EFBFBD>[<5B><><EFBFBD>o<EFBFBD><6F><EFBFBD>悤<EFBFBD>ɂ<EFBFBD><C982>Ă<EFBFBD><C482><EFBFBD><EFBFBD>悤<EFBFBD>ł<EFBFBD><C582>i<EFBFBD><69><EFBFBD><EFBFBD>Perl<72><6C><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>z<EFBFBD><7A><EFBFBD>̓W<CC93>J<EFBFBD><4A><EFBFBD>T<EFBFBD>|<7C>[<5B>g<EFBFBD><67><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>G<EFBFBD><47><EFBFBD>[<5B><><EFBFBD>o<EFBFBD><6F><EFBFBD><EFBFBD><EFBFBD>ƂȂ<C682><C882>A<EFBFBD>ق<EFBFBD><D982>ēW<C493>J<EFBFBD><4A><EFBFBD>邾<EFBFBD><E982BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Q<EFBFBD>Ɓj<C681>B
|
|||
|
"<22><><EFBFBD>@\dog" <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><CE82><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>ӌ<EFBFBD><D38C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>A\d <20><><EFBFBD><EFBFBD><EFBFBD>^<5E><><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ē<EFBFBD><C493>ʈӖ<CA88><D396><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>߂ɂ<DF82><C982>܂<EFBFBD><DC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂ł<CC82><C582><EFBFBD><EFBFBD>āiPerl 5.6<EFBFBD>ȍ~<7E>ł́A<CD81>x<EFBFBD><78> Unrecognized escape \d passed through <20>u<EFBFBD>F<EFBFBD><46><EFBFBD>ł<EFBFBD><C582>Ȃ<EFBFBD><C882>G<EFBFBD>X<EFBFBD>P<EFBFBD>[<5B>v \d <20><><EFBFBD>n<EFBFBD><6E><EFBFBD>ꂽ<EFBFBD>v<EFBFBD><76><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>j<EFBFBD>A<EFBFBD>Ⴆ<EFBFBD><E182A6> "<22>ԁ@\flower" <20>̂Ƃ<CC82><C682>́A\f <20><><EFBFBD><EFBFBD><EFBFBD>y<EFBFBD>[<5B>W<EFBFBD><57><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ĉ<EFBFBD><C489>߂<EFBFBD><DF82><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
Possible unintended interpolation of @dog in string (Perl 5.6.1<EFBFBD>ȍ~)
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><EFBFBD>ŁA@dog<6F><67><EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɓW<C993>J<EFBFBD><4A><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD>O<EFBFBD><EFBFBD><EFBFBD>Ɠ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A"<22><><EFBFBD>@dog" <20>ł<EFBFBD><C582><EFBFBD><EFBFBD>APerl 5.6.1<EFBFBD>iActivePerl 626<32>j<EFBFBD>ȍ~<7E>ł́A<CD81><41><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>Ȃ<EFBFBD><C882>z<EFBFBD><7A><EFBFBD>ł<EFBFBD><C582>ق<EFBFBD><D982>ēW<C493>J<EFBFBD><4A><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>z<EFBFBD><7A> @dog <20><><EFBFBD>W<EFBFBD>J<EFBFBD><4A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂ŁA"<22><>\x81" <20>Ɠ<EFBFBD><C693><EFBFBD><EFBFBD>ɂȂ<C982><C882>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̓G<EFBFBD><EFBFBD><EFBFBD>[<5B>ł͂Ȃ<CD82><C882>A<EFBFBD>x<EFBFBD><78><EFBFBD>ɂȂ<C982><C882>܂<EFBFBD><DC82>B
|
|||
|
Can't find string terminator '"' anywhere before EOF
|
|||
|
<EFBFBD>u<EFBFBD>I<EFBFBD>[<5B><><EFBFBD><EFBFBD> '"'<27><><EFBFBD>t<EFBFBD>@<40>C<EFBFBD><43><EFBFBD>̏I<CC8F><49> EOF <20>܂łɌ<C582><C98C><EFBFBD><C282><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD>v
|
|||
|
<EFBFBD>Ⴆ<EFBFBD>A"<22>Ή<EFBFBD><CE89>\" <20>̂悤<CC82>ȃ<EFBFBD><C883>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD>ł́A'<27>\' <20>̑<EFBFBD><CC91>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> \ <20>ł<EFBFBD><C582>邽<EFBFBD>߁A<DF81><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> " <20><><EFBFBD>G<EFBFBD>X<EFBFBD>P<EFBFBD>[<5B>v<EFBFBD><76><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>̂<EFBFBD><CC82><EFBFBD>perl<72>́A<CD81><41><EFBFBD><EFBFBD> " <20>̓N<CD83>I<EFBFBD>[<5B>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̏I<CC8F>[<5B><><EFBFBD><EFBFBD><EFBFBD>Ƃ݂͂Ȃ<DD82><C882><EFBFBD><EFBFBD>ɁA<C981><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><F182AA82><EFBFBD><EFBFBD>ɑ<EFBFBD><C991><EFBFBD><EFBFBD>ƍl<C68D><6C><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>ȍ~<7E>A<EFBFBD>X<EFBFBD>N<EFBFBD><4E><EFBFBD>v<EFBFBD>g<EFBFBD>̒<EFBFBD><CC92><EFBFBD> " <20>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>S<EFBFBD><53><EFBFBD>܂܂<DC82><DC82>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>A<CE81><41><EFBFBD>̂悤<CC82>ɃG<C983><47><EFBFBD>[<5B><EFBFBD><F18D9082><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
qq{ "<22><><EFBFBD>{<7B><>" }<7D>̂悤<CC82>ȏꍇ<C88F>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>ӂ<EFBFBD><D382>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ȃ<CE82><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B"<22>{" <20>̑<EFBFBD><CC91><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> { <20>Ȃ̂ŁA<C581><41><EFBFBD>̂܂܂ł<DC82> { }<7D>̃l<CC83>X<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>A<EFBFBD><41><EFBFBD>l<EFBFBD>̃G<CC83><47><EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
Bareword found where operator expected
|
|||
|
<EFBFBD>u<EFBFBD><EFBFBD><EFBFBD>̌ꂪ<EFBFBD><EFBFBD><EFBFBD>Z<EFBFBD>q<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ăق<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʒu<EFBFBD>Ɍ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>v
|
|||
|
<EFBFBD>Ⴆ<EFBFBD>Aprint "<img alt=\"<22>Ή<EFBFBD><CE89>\\" height=115 width=150>"; <20>̂悤<CC82>ȏꍇ<C88F>A\" <20>ɂ<EFBFBD><C982><EFBFBD><EFBFBD><EFBFBD><EFBFBD>p<EFBFBD><70><EFBFBD>̃G<CC83>X<EFBFBD>P<EFBFBD>[<5B>v<EFBFBD>́A<CD81>\ <20>̑<EFBFBD><CC91>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67>\<5C>̂<EFBFBD><CC82>߁A\\ " <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>g<EFBFBD>ݍ<EFBFBD><DD8D>킹<EFBFBD>ɂȂ<C982><C882>A<EFBFBD>G<EFBFBD>X<EFBFBD>P<EFBFBD>[<5B>v<EFBFBD><76><EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>̂<EFBFBD><CC82>߁A<DF81><41><EFBFBD>̃<EFBFBD><CC83>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD>́Aperl<72><6C><EFBFBD>猩<EFBFBD><E78CA9><EFBFBD>ƁA"<img alt=\"<22>Ή<EFBFBD><CE89>\\" <20>ŏI<C58F><49><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>̂<EFBFBD><CC82>߁A<DF81><41><EFBFBD>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD>̌<EFBFBD><CC8C>ɁAheight <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>u<EFBFBD><75><EFBFBD>̌<EFBFBD><CC8C>v<EFBFBD>i<EFBFBD>N<EFBFBD>I<EFBFBD>[<5B>g<EFBFBD>ň͂܂<CD82><DC82>Ă<EFBFBD><C482>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>j<EFBFBD><6A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>悤<EFBFBD>ɂ݂āA<C481><41><EFBFBD><EFBFBD><EFBFBD>ɂ͗<C982><CD97>̌<EFBFBD><CC8C>ł͂Ȃ<CD82><C882>A<EFBFBD><41><EFBFBD>Z<EFBFBD>q<EFBFBD><71><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ׂ<EFBFBD><D782>ł͂Ȃ<CD82><C882><EFBFBD><EFBFBD>H<EFBFBD><48>perl<72>͍l<CD8D><6C><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
Unrecognized character \x82
|
|||
|
<EFBFBD>u<EFBFBD>F<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> \x82<38>v
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A<EFBFBD><EFBFBD>ASCII<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>₻<EFBFBD>̑<EFBFBD><EFBFBD>̕<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>u<EFBFBD><EFBFBD><EFBFBD>̌<EFBFBD><EFBFBD>v<EFBFBD>ɂ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><EFBFBD>ɏo<EFBFBD>郁<EFBFBD>b<EFBFBD>Z<EFBFBD>[<5B>W<EFBFBD>ł<EFBFBD><C582>B"<22>Ή<EFBFBD><CE89>\" <20>̂悤<CC82>ȃ<EFBFBD><C883>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>āA<C481><41><EFBFBD>̂<EFBFBD><CC82>Ƃ<EFBFBD> "<22>Ȃ<EFBFBD><C882>ł<EFBFBD><C582><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>" <20>̂悤<CC82>ȃ<EFBFBD><C883>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>A<EFBFBD>O<EFBFBD><4F><EFBFBD>Ɠ<EFBFBD><C693><EFBFBD><EFBFBD><EFBFBD><EFBFBD>R<EFBFBD><52><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂ł<CC82><C582>B
|
|||
|
<EFBFBD>܂<EFBFBD><EFBFBD>Aq{<7B>}<7D>b<EFBFBD>`} <20>̂悤<CC82>ȏꍇ<C88F>ɂ<EFBFBD><C982>A'<27>}' <20>̑<EFBFBD><CC91><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> } <20>Ȃ̂ŁA{ } <20>̃J<CC83>b<EFBFBD>R<EFBFBD>͂<EFBFBD><CD82><EFBFBD><EFBFBD>ŏI<C58F><49><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>A<EFBFBD><41><EFBFBD>l<EFBFBD>ȃG<C883><47><EFBFBD>[<5B>ɂȂ<C982><C882>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD>Ȃ<EFBFBD><C882>͂<EFBFBD><CD82>Ȃ̂Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>P<EFBFBD>j
|
|||
|
"<22><><EFBFBD>J<EFBFBD><4A>" =~ /<2F>|<7C>b<EFBFBD>g/ <20>̓}<7D>b<EFBFBD>`<60><><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>́A'<27>|' <20>̑<EFBFBD><CC91><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> | <20>Ȃ̂ŁA/<2F>|<7C>b<EFBFBD>g/ <20><> /\x83|<7C>b<EFBFBD>g/ <20>Ƃ݂Ȃ<DD82><C882><EFBFBD><EFBFBD>A\x83 <20><><EFBFBD><EFBFBD><EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>悢<CE82><E682A2><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>B
|
|||
|
<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD>Ȃ<EFBFBD><C882>͂<EFBFBD><CD82>Ȃ̂Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>Q<EFBFBD>j
|
|||
|
"<22>Z<EFBFBD><5A>" =~ /Z/ <20>̓}<7D>b<EFBFBD>`<60><><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>́A'<27>Z' <20>̑<EFBFBD><CC91><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> 'Z' <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD>A<EFBFBD><41><EFBFBD>t<EFBFBD>@<40>x<EFBFBD>b<EFBFBD>g<EFBFBD>ɂȂ镶<C882><E995B6><EFBFBD>ɂ͒<C982><CD92>ӂ<EFBFBD><D382>K<EFBFBD>v<EFBFBD>ł<EFBFBD><C582>B
|
|||
|
<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>͂<EFBFBD><CD82>Ȃ̂Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD>Ȃ<EFBFBD><C882>i<EFBFBD>P<EFBFBD>j
|
|||
|
"<22>^<5E>]<5D>Ƌ<EFBFBD>" =~ /<2F>^<5E>]/ <20>̓}<7D>b<EFBFBD>`<60><><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>́A'<27>^' <20>̑<EFBFBD><CC91><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> '^'<27>Ȃ̂ŁA/<2F>^<5E>]/ <20><> /\x89^<5E>]/ <20>Ƃ݂Ȃ<DD82><C882><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̎n<CC8E><6E> ^ <20>̑O<CC91><4F> \x89 <20>͂Ȃ<CD82><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>B
|
|||
|
Search pattern not terminated
|
|||
|
<EFBFBD>u<EFBFBD>T<EFBFBD>[<5B>`<60>p<EFBFBD>^<5E>[<5B><><EFBFBD><EFBFBD><EFBFBD>I<EFBFBD><49><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>v
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A/<2F>\/ <20>̂悤<CC82>ɁA<C981><41><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> \ <20>ł<EFBFBD><C582>镶<EFBFBD><E995B6><EFBFBD>ŃT<C583>[<5B>`<60>p<EFBFBD>^<5E>[<5B><><EFBFBD><EFBFBD><EFBFBD>I<EFBFBD><49><EFBFBD>点<EFBFBD>悤<EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ɋN<C98B><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD>Z<EFBFBD>q<EFBFBD>̏I<CC8F>[<5B><><EFBFBD><EFBFBD> / <20><><EFBFBD>G<EFBFBD>X<EFBFBD>P<EFBFBD>[<5B>v<EFBFBD><76><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>̂ŁA<C581>T<EFBFBD>[<5B>`<60>p<EFBFBD>^<5E>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɐ<EFBFBD><C990>ɑ<EFBFBD><C991><EFBFBD><EFBFBD>悤<EFBFBD>ɉ<EFBFBD><C989>߂<EFBFBD><DF82><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>̐<EFBFBD><CC90>ɂ<EFBFBD><C982><EFBFBD><EFBFBD><EFBFBD><EFBFBD>x/<2F>͂<EFBFBD><CD82><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>H
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ŁA<EFBFBD>ʂ̃G<EFBFBD><EFBFBD><EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>傤<EFBFBD>B
|
|||
|
Substitution replacement not terminated
|
|||
|
<EFBFBD>u<EFBFBD>u<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̒u<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>I<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD>v
|
|||
|
<EFBFBD>u<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Z<EFBFBD>q<EFBFBD><EFBFBD> s/PATTERN/REPLACEMENT/<2F>̌`<60><><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>˂Ȃ<CE82><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD> s/<2F>\/<2F><>/; <20>̂悤<CC82>ɁA<C981><41><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> \ <20>ł<EFBFBD><C582>镶<EFBFBD><E995B6><EFBFBD><EFBFBD>PATTERN<52><4E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>I<EFBFBD><49><EFBFBD>点<EFBFBD>悤<EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ɂ<EFBFBD><C982>̃G<CC83><47><EFBFBD>[<5B><><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD>Z<EFBFBD>q<EFBFBD>̏I<CC8F>[<5B><><EFBFBD><EFBFBD> / <20><><EFBFBD>G<EFBFBD>X<EFBFBD>P<EFBFBD>[<5B>v<EFBFBD><76><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>̂ŁAPATTERN<52><4E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɐ<EFBFBD><C990>ɑ<EFBFBD><C991><EFBFBD><EFBFBD>悤<EFBFBD>ɉ<EFBFBD><C989>߂<EFBFBD><DF82><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>̂<EFBFBD><CC82><EFBFBD>perl<72>́APATTERN<52><4E> <20>\/<2F><> <20>̕<EFBFBD><CC95><EFBFBD><EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>ƍl<C68D><6C><EFBFBD>A<EFBFBD>R<EFBFBD>Ԗڂ<D496>/<2F>̐<EFBFBD><CC90><EFBFBD>REPLACEMENT<4E><54><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɈႢ<C988>Ȃ<EFBFBD><C882>Ǝv<C68E><76><EFBFBD>̂ł<CC82><C582><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>̐<EFBFBD><CC90>ɂ<EFBFBD><C982><EFBFBD><EFBFBD><EFBFBD><EFBFBD>x/<2F>͂<EFBFBD><CD82><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>H
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ŁA<EFBFBD>ʂ̃G<EFBFBD><EFBFBD><EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>傤<EFBFBD>B
|
|||
|
unmatched [ ] in regexp
|
|||
|
<EFBFBD>u<EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>\<5C><><EFBFBD>Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD>Ȃ<EFBFBD> [ ] <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>v
|
|||
|
<EFBFBD>Ⴆ<EFBFBD>A/<2F>v<EFBFBD>[<5B><>/ <20>ł̓G<CD83><47><EFBFBD>[<5B><><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD> '<27>[' <20>̑<EFBFBD><CC91><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> [ <20>Ȃ̂ŁA/<2F>v<EFBFBD>[<5B><>/ <20><> /<2F>v\x81[\x83\x8B/ <20>Ƃ݂Ȃ<DD82><C882><EFBFBD><EFBFBD>Aperl<72>͕<EFBFBD><CD95><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD>X<EFBFBD><58><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂ł͂Ȃ<CD82><C882><EFBFBD><EFBFBD>Ǝv<C68E><76><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD>X<EFBFBD>̏I<CC8F><49><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ] <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><C282><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>̂ŃG<C583><47><EFBFBD>[<5B>ɂȂ<C982><C882>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>G<EFBFBD><EFBFBD><EFBFBD>[<5B>ɂ͂Ȃ<CD82><C882>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ǖ<EFBFBD><C795><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>T<EFBFBD>j
|
|||
|
<EFBFBD>Ⴆ<EFBFBD>Alc('<27>A<EFBFBD>C<EFBFBD>E<EFBFBD>G<EFBFBD>I')<29>́A'<27>a<EFBFBD>c<EFBFBD>e<EFBFBD>g<EFBFBD>i'<27><><EFBFBD>Ԃ<EFBFBD><D482>܂<EFBFBD><DC82>BShift-JIS<49>̂Q<CC82>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><CC92>ɂ́A<CD81><41><EFBFBD>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67>ASCII<49>ʼnp<C589><70><EFBFBD>ɓ<EFBFBD><C993><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>ڂ<EFBFBD><DA82><EFBFBD><EFBFBD>̓A<CD83><41><EFBFBD>t<EFBFBD>@<40>x<EFBFBD>b<EFBFBD>g<EFBFBD>̑啶<CC91><E595B6><EFBFBD>Ə<EFBFBD><C68F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>G<EFBFBD><EFBFBD><EFBFBD>[<5B><><EFBFBD>ԈႢ<D488><E182A2><EFBFBD>h<EFBFBD><68><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD>ȏ<EFBFBD><EFBFBD>̂悤<EFBFBD>ȃG<EFBFBD><EFBFBD><EFBFBD>[<5B><><EFBFBD>h<EFBFBD><68><EFBFBD>ɂ͂<C982><CD82>܂<EFBFBD><DC82>܂ȕ<DC82><C895>@<40><><EFBFBD>l<EFBFBD><6C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>Ⴆ<EFBFBD>A"<22>\\<5C><>" <20>Ə<EFBFBD><C68F><EFBFBD><EFBFBD><EFBFBD><CE82><EFBFBD><EFBFBD>ȂǂƂ<C782><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><F182BB82>ł<EFBFBD><C582><EFBFBD><EFBFBD>܂<EFBFBD><DC82>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82>߂ɂ͂ǂ̕<C782><CC95><EFBFBD><EFBFBD>̌<EFBFBD><CC8C><EFBFBD> \ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><CE82><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>m<EFBFBD><6D><EFBFBD>K<EFBFBD>v<EFBFBD><76><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>͕<EFBFBD><CD95><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h<EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Έꔭ<CE88>Ŗ<EFBFBD><C596>炩<EFBFBD>ł<EFBFBD><C582>B
|
|||
|
<EFBFBD>c<EFBFBD>ȂǂƂ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʓ|<7C>Ȃ<EFBFBD><C882>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>ɂȂ<C982><C882>Ȃ<EFBFBD><C882>l<EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h<EFBFBD>\<5C>Ȃi<F182A981><69><EFBFBD>Ȃ<EFBFBD><C882>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɂȂ<C982><C882>悤<EFBFBD>ȕ<EFBFBD><C895><EFBFBD><EFBFBD><EFBFBD><EFBFBD>炢<EFBFBD>́j<CD81>ËL<C38B><4C><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82><EFBFBD><CE82><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>悤<EFBFBD>Ȑl<C890>ɂƂ<C982><C682>ẮA<CD81>m<EFBFBD><6D><EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>ʼn<EFBFBD><C589><EFBFBD><EFBFBD>ɂȂ<C982><C882>Ǝv<C68E><76><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>̂悤<CC82>Ȑl<C890>ɂ́A<CD81><41><EFBFBD><EFBFBD><EFBFBD>ȃy<C883>[<5B>W<EFBFBD><57><EFBFBD><EFBFBD><EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD><76><EFBFBD>q<EFBFBD>}<7D><><EFBFBD>Ȃ<EFBFBD><C882>ł<EFBFBD><C582>傤<EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ŁA<EFBFBD><EFBFBD><EFBFBD>̂悤<EFBFBD>ȃy<EFBFBD>[<5B>W<EFBFBD><57><EFBFBD>킴<EFBFBD>킴<EFBFBD><ED82B4><EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>悤<EFBFBD>Ȑl<C890>́A<CD81><41><EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h<EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ׂ<EFBFBD><D782><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>ЂƂ<D082><C682>Ɖ<EFBFBD><C689>肵<EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>ʂɂ<CA82><C982><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>Ĕ<EFBFBD><C494><EFBFBD><EF82B3><EFBFBD>邱<EFBFBD>Ƃ͂<C682><CD82><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>Ԃ<EFBFBD><D482>ɂ<EFBFBD><C982>ނ<EFBFBD><DE82>܂<EFBFBD><DC82>Ԉ<EFBFBD><D488><EFBFBD><EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><76><EFBFBD>O<EFBFBD><4F><EFBFBD><EFBFBD><EFBFBD>C<F095BD8B>ō<EFBFBD><C58D><EFBFBD><EFBFBD>Ă<EFBFBD><C482>ẮA<CD81><41><EFBFBD>ɃN<C983><4E><EFBFBD>[<5B><><EFBFBD>p<EFBFBD>C<EFBFBD><43><EFBFBD>Ԃ<D482><C282><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>d<EFBFBD><64><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>e<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̍<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD>悭<EFBFBD>m<EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><EFBFBD><EFBFBD><EFBFBD>˂Ȃ<EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ́A\ <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>G<EFBFBD>X<EFBFBD>P<EFBFBD>[<5B>v<EFBFBD>p<EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD>́A<CD81>ϐ<EFBFBD><CF90>W<EFBFBD>J<EFBFBD><EFBFBD>^<5E><><EFBFBD><EFBFBD><EFBFBD>̉<EFBFBD><CC89>߂<EFBFBD><DF82>肸<EFBFBD><E882B8><EFBFBD>ƑO<C691>̒i<CC92>K<EFBFBD>ł<EFBFBD><C582>܂<EFBFBD><DC82>܂ȉe<C889><65><EFBFBD><EFBFBD><EFBFBD>y<EFBFBD>ڂ<EFBFBD><DA82>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃł<C682><C582>B<EFBFBD><42><EFBFBD>̂<EFBFBD><CC82>߁A<DF81>ǂ<EFBFBD><C782><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>f<EFBFBD>[<5B>^<5E><><EFBFBD>m<EFBFBD><6D><EFBFBD>ɕϐ<C995><CF90>̒<EFBFBD><CC92>Ɏ<EFBFBD><C98E>߂<EFBFBD><DF82><EFBFBD><EFBFBD>邩<EFBFBD><E982A9><EFBFBD>l<EFBFBD><6C><EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD><76><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>ϐ<EFBFBD><CF90>̓<EFBFBD><CC93><EFBFBD><EFBFBD>Ɏ<EFBFBD><C98E>߂Ă<DF82><C482>܂<EFBFBD><DC82>APerl<72><6C><EFBFBD>f<EFBFBD>[<5B>^<5E><><EFBFBD>K<EFBFBD>ɊǗ<C98A><C797><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>悭<EFBFBD>m<EFBFBD><6D><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD> $str = "<22>\<5C><>" <20>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>ϐ<EFBFBD>$str<74>ɑ<EFBFBD><C991><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȑO<C891>A<EFBFBD>_<EFBFBD>u<EFBFBD><75><EFBFBD>N<EFBFBD>H<EFBFBD>[<5B>g<EFBFBD>ň͂<CD82><F182BE8E>_<EFBFBD>ł<EFBFBD><C582>łɕ<C582><C995><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>ƍl<C68D><6C><EFBFBD><EFBFBD><EFBFBD>ׂ<EFBFBD><D782>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD>łɕ<C582><C995><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>f<EFBFBD>[<5B>^<5E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>āA<C481>D<EFBFBD><44><EFBFBD><EFBFBD><EFBFBD>ʂ<EFBFBD><CA82><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͂<EFBFBD><CD82><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>q<EFBFBD>A<EFBFBD>h<EFBFBD>L<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>g<EFBFBD>͈<EFBFBD><EFBFBD>S<EFBFBD><EFBFBD><EFBFBD>̍<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>@<40>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>I<EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>V<EFBFBD><56><EFBFBD>O<EFBFBD><4F><EFBFBD>N<EFBFBD>H<EFBFBD>[<5B>g<EFBFBD>ň͂<C588><CD82>ł<EFBFBD><C582><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>Ă͂Ȃ<CD82><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD>_<EFBFBD>u<EFBFBD><75><EFBFBD>N<EFBFBD>H<EFBFBD>[<5B>g<EFBFBD>ň͂<CD82><F182BE82>A<EFBFBD>N<EFBFBD>H<EFBFBD>[<5B>g<EFBFBD><67><EFBFBD>t<EFBFBD><74><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł́A<CD81>\<5C><><EFBFBD><EFBFBD><EFBFBD>ʕϐ<CA95><CF90>W<EFBFBD>J<EFBFBD><EFBFBD>^<5E><><EFBFBD><EFBFBD><EFBFBD>̉<EFBFBD><CC89>߂<EFBFBD><DF82>h<EFBFBD><68><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ł<EFBFBD><C582>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>V<EFBFBD><EFBFBD><EFBFBD>O<EFBFBD><EFBFBD><EFBFBD>N<EFBFBD>H<EFBFBD>[<5B>g<EFBFBD>ŏI<C58F>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͂q<F182BE83>A<EFBFBD>h<EFBFBD>L<EFBFBD><4C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>g<EFBFBD>ł́A<CD81>ϐ<EFBFBD><CF90>W<EFBFBD>J<EFBFBD><EFBFBD>^<5E><><EFBFBD><EFBFBD><EFBFBD>̉<EFBFBD><CC89>߂͉<DF82><CD89><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>I<EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD>̏ꍇ<CC8F><EA8D87> "\nEOF\n"<22>j<EFBFBD><6A><EFBFBD>T<EFBFBD><54><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>q<EFBFBD>A<EFBFBD>h<EFBFBD>L<EFBFBD><4C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>g<EFBFBD><67><EFBFBD>g<EFBFBD><67><EFBFBD>ƕ<EFBFBD><C695><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɉ<EFBFBD><C989>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><C282>܂<EFBFBD><DC82><EFBFBD><EFBFBD>Achomp<6D>ŏ<EFBFBD><C58F><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>ł<EFBFBD><C582>傤<EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>̗<EFBFBD><EFBFBD><EFBFBD> $str = '<27><><EFBFBD><EFBFBD><EFBFBD>Ƀe<C983>L<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD>' <20>Ɠ<EFBFBD><C693><EFBFBD><EFBFBD>悤<EFBFBD>ɓ<EFBFBD><C993><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̓<EFBFBD><CC93>e<EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>Ė<EFBFBD><C496>肪<EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>Ƀ<EFBFBD><C983>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>Ɗ<EFBFBD><C68A>҂ł<D282><C582>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
chomp($str = << 'EOF');
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƀe<EFBFBD>L<EFBFBD>X<EFBFBD>g<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
EOF
|
|||
|
|
|||
|
$src = << 'EOF';
|
|||
|
$path = "C:\\path\\file";
|
|||
|
open FH, $path;
|
|||
|
EOF
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̕<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>x<EFBFBD>ɍ<EFBFBD><EFBFBD>肽<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Asplit<EFBFBD>ŕ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ɨe<EFBFBD>Ղɍ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
($name, $career, $age, $memo) = split "\n", << 'EOF';
|
|||
|
<EFBFBD>c<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Y
|
|||
|
<EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>O<EFBFBD><EFBFBD><EFBFBD>}
|
|||
|
<EFBFBD>O<EFBFBD>\<5C><>
|
|||
|
<EFBFBD>啟<EFBFBD><EFBFBD><EFBFBD>D<EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><EFBFBD><EFBFBD><EFBFBD>B <20><><EFBFBD>͂<EFBFBD><CD82>܂<EFBFBD><DC82>ۂ܂Ȃ<DC82><C882>B
|
|||
|
EOF
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȍ<EFBFBD><EFBFBD>ɏ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A\<5C>i<EFBFBD>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ɋ܂܂<DC82><DC82>Ă<EFBFBD><C482><EFBFBD><EFBFBD>͍̂\<5C><><EFBFBD>Ȃ<EFBFBD><C882>j<EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>уJ<D183>b<EFBFBD>R<EFBFBD><52><EFBFBD>܂܂Ȃ<DC82><C882>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ŁAqw() <20><><EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ł<EFBFBD><C582>܂<EFBFBD><DC82>B<EFBFBD>Ⴆ<EFBFBD>A@str = qw(<28>\<5C><> <20>Ή<EFBFBD><CE89>\ );<3B>̂悤<CC82>ɋ<C98B><F3949282><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ăJ<C483>b<EFBFBD>R<EFBFBD>̃G<CC83>X<EFBFBD>P<EFBFBD>[<5B>v<EFBFBD><76><EFBFBD>h<EFBFBD><68><EFBFBD>܂<EFBFBD><DC82>B@str = qw(<28>\<5C><> <20>Ή<EFBFBD><CE89>\);<3B>̂悤<CC82>ɋ<C98B><F3949282><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>ƃG<C683><47><EFBFBD>[<5B>̌<EFBFBD><CC8C>ł<EFBFBD><C582>B
|
|||
|
<EFBFBD>P<EFBFBD>̕<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>鎞<EFBFBD>ł<EFBFBD><EFBFBD>A<EFBFBD><EFBFBD><EFBFBD>ӂ<EFBFBD><EFBFBD>ۃJ<EFBFBD>b<EFBFBD>R<EFBFBD>ň͂<EFBFBD><EFBFBD>Ń<EFBFBD><EFBFBD>X<EFBFBD>g<EFBFBD>R<EFBFBD><EFBFBD><EFBFBD>e<EFBFBD>L<EFBFBD>X<EFBFBD>g<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>E<EFBFBD>ӂ<EFBFBD><EFBFBD>X<EFBFBD><EFBFBD><EFBFBD>C<EFBFBD>X<EFBFBD>ɂ<EFBFBD><EFBFBD>邩<EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD>܂<EFBFBD><EFBFBD><EFBFBD><EFBFBD>B<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A<EFBFBD>i<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł́jqw// <20><> split(' ', q//) <20>̗<EFBFBD><CC97>L<EFBFBD>Ƃ<EFBFBD><C682>Ď<EFBFBD><C48E><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>邩<EFBFBD><E982A9><EFBFBD>ł<EFBFBD><C582>B<EFBFBD>Ȃ<EFBFBD><C882>APerl 5.6<EFBFBD>ł̓<EFBFBD><EFBFBD>X<EFBFBD>g<EFBFBD>Ɠ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɂȂ<EFBFBD><EFBFBD>Ă<EFBFBD><EFBFBD><EFBFBD><EFBFBD>悤<EFBFBD>ł<EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
($str) = qw(<28>S<EFBFBD>O<EFBFBD>\ );
|
|||
|
$str = (qw/<2F>S<EFBFBD>O<EFBFBD>\ /)[0];
|
|||
|
$str = qw/<2F>S<EFBFBD>O<EFBFBD>\ /; # Perl 5.6
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>\<5C><><EFBFBD>ƃ}<7D>b<EFBFBD>`
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>\<5C><><EFBFBD>̃<EFBFBD><CC83>^<5E><><EFBFBD><EFBFBD><EFBFBD>͑<EFBFBD><CD91><EFBFBD><EFBFBD>̂ŁA<C581><41><EFBFBD>K<EFBFBD>\<5C><><EFBFBD>̒<EFBFBD><CC92><EFBFBD>Shift-JIS<49>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>߂<F0968482><DF82>ނ͓̂<CC82><CD93><EFBFBD><EFBFBD>ł͂<C582><CD82><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD>Ⴆ<EFBFBD>A/\Q<>Ή<EFBFBD><CE89>\/ <20>ł̓G<CD83><47><EFBFBD>[<5B>ɂȂ<C982><C882>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>́A/ / <20>͈̔͂̌<CD82><CC8C>肪<EFBFBD>^<5E><><EFBFBD><EFBFBD><EFBFBD>ɍs<C98D><73><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>̎<EFBFBD><CC8E>_<EFBFBD>ŃG<C583><47><EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂ŁA\Q <20>̌<EFBFBD><CC8C>ʂ<EFBFBD><CA82>y<EFBFBD>ڂ<EFBFBD><DA82><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ł<EFBFBD><C582>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>B<EFBFBD>܂<EFBFBD><DC82>A/\Q<>Ή<EFBFBD><CE89>\\E/ <20>͍I<CD8D><49><EFBFBD>s<EFBFBD><73><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>́A<CD81>Ή<EFBFBD><CE89>\\E <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂ނ<DC82><DE82>̂ɂ<CC82><C982><EFBFBD><EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>́A\\ <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>邽<EFBFBD>߁A\E <20><><EFBFBD>F<EFBFBD><46><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>傤<EFBFBD>i<EFBFBD><69><EFBFBD>Ԃ<EFBFBD><D482>j<EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><EFBFBD>߁A<EFBFBD>ϐ<EFBFBD><EFBFBD>ɓ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>āA<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD>Z<EFBFBD>q<EFBFBD><71><EFBFBD>u<EFBFBD><75><EFBFBD><EFBFBD><EFBFBD>Z<EFBFBD>q<EFBFBD>̒<EFBFBD><CC92>œW<C593>J<EFBFBD><4A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>낵<EFBFBD><EB82B5><EFBFBD>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD>̂Ƃ<CC82><C682><EFBFBD><EFBFBD>{<7B>ꕶ<EFBFBD><EA95B6><EFBFBD><EFBFBD><EFBFBD>͗\<5C><>quotemeta <20><EFBFBD><D690>ŏ<EFBFBD><C58F><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
$pat = quotemeta +(qw/ <20>\ /)[0];
|
|||
|
$str =~ /$pat\d+/; # <20>\1, <20>\2, ..<2E>ȂǂɃ}<7D>b<EFBFBD>`
|
|||
|
# <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> $str = '<27><>\\1' <20>ł<EFBFBD><C582>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD>̖<EFBFBD><CC96><EFBFBD><EFBFBD>͌<EFBFBD><CD8C>q<EFBFBD>j
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>̂悤<EFBFBD>ȏ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͊m<EFBFBD><EFBFBD><EFBFBD>ɏX<EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><EFBFBD>ˁB<EFBFBD>N<EFBFBD>I<EFBFBD>[<5B>g<EFBFBD>̒<EFBFBD><CC92><EFBFBD> \Q \E <20><><EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>́A<CD81><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><F182AA93><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>ϐ<EFBFBD><CF90>ƈꏏ<C688>ɂȂ<C982><C882><EFBFBD><EFBFBD>肪<EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>邱<EFBFBD>ƂŁA\Q \E <20>͈̔͂<CD88><CD82><EFBFBD><EFBFBD>m<EFBFBD>ɂȂ邩<C882><E982A9><EFBFBD>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̍<EFBFBD><CC8D><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A<CD81>O<EFBFBD>q<EFBFBD>̃<EFBFBD><CC83>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD>̍<EFBFBD><CC8D>肩<EFBFBD><E882A9><EFBFBD><EFBFBD><EFBFBD>Q<EFBFBD>l<EFBFBD>ɂ<EFBFBD><C982>ĉ<EFBFBD><C489><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
$pat = "(?:\Q$str1\E|\Q$str2\E)*";
|
|||
|
$str =~ /$pat/;
|
|||
|
|
|||
|
# <20><><EFBFBD>͏<EFBFBD><CD8F>̕<EFBFBD><CC95>͎<EFBFBD><CD8E>̕<EFBFBD><CC95>Ɠ<EFBFBD><C693><EFBFBD><EFBFBD>B
|
|||
|
# $pat = "(?:" . quotemeta($str1) . "|" . quotemeta($str2) . ")*";
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>e<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD>H<EFBFBD>[<5B>g<EFBFBD>̒<EFBFBD><CC92>ɒ<EFBFBD><C992>ږ<EFBFBD><DA96>߂<EFBFBD><DF82>ނƂ<DE82><C682>܂<EFBFBD><DC82>s<EFBFBD><73><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>́Aperl<72><6C> \E <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>^<5E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><F094AD8C><EFBFBD><EFBFBD>悤<EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>̂<EFBFBD><CC82>AShift-JIS<49><53><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>W<EFBFBD><57><EFBFBD>邽<EFBFBD>߂ł<DF82><C582>B
|
|||
|
"\Q<>\\E"<22>ł́A<CD81>\E<>Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD>鐳<EFBFBD>K<EFBFBD>\<5C><><EFBFBD>ɂȂ<C982><C882>܂<EFBFBD><DC82>B<EFBFBD>\<5C>̑<EFBFBD><CC91><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> \ <20>Ǝ<EFBFBD><C68E><EFBFBD> \<5C><><EFBFBD><EFBFBD><EFBFBD>킳<EFBFBD><ED82B3><EFBFBD>̂ŁAperl<72>ɂ<EFBFBD>\Q \x95 \\ E<>̑g<CC91>ݍ<EFBFBD><DD8D>킹<EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>悤<EFBFBD>Ɏv<C98E><76><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B \Q<>̍<EFBFBD><CC8D>p<EFBFBD>̌<EFBFBD><CC8C>ʂ<EFBFBD>\\x95\\x5cE<63>ɂȂ<C982><C882>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>̂<EFBFBD><CC82>߁A<DF81>\E<>Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
"\Q<>\"<22>͂ǂ<CD82><C782>ł<EFBFBD><C582>傤<EFBFBD>B<EFBFBD><42><EFBFBD>̏ꍇ<CC8F>́A" " <20>͈̔͂<CD88><CD82><EFBFBD><EFBFBD>߂<EFBFBD><DF82>Ƃ<EFBFBD><C682>ɁA<C981>\<5C>̑<EFBFBD><CC91><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̃N<CC83>H<EFBFBD>[<5B>g<EFBFBD><67><EFBFBD>G<EFBFBD>X<EFBFBD>P<EFBFBD>[<5B>v<EFBFBD><76><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>̂ŁA<C581><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͈̔͂<CD88><CD82><EFBFBD><EFBFBD>҂<EFBFBD><D282><EFBFBD><EFBFBD>悤<EFBFBD>ɂ͒<C982><CD92>܂炸<DC82>A<EFBFBD>G<EFBFBD><47><EFBFBD>[<5B>ɂȂ<C982><C882>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>̃G<CC83><47><EFBFBD>[<5B><>\Q<>̌<EFBFBD><CC8C>ʂ<EFBFBD><CA82>l<EFBFBD><6C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>O<EFBFBD>ɔ<EFBFBD><C994><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂ŁA<C581>h<EFBFBD><68><EFBFBD>悤<EFBFBD><E682A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
"\Q<>\\\E"<22>͂ǂ<CD82><C782>ł<EFBFBD><C582>傤<EFBFBD>B<EFBFBD>m<EFBFBD><6D><EFBFBD><EFBFBD>Shift-JIS<49>ł͖<C582><CD96>肠<EFBFBD><E882A0><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>X<EFBFBD>N<EFBFBD><4E><EFBFBD>v<EFBFBD>g<EFBFBD><67>EUC-JP<4A><50>UTF-8<>ɕϊ<C995><CF8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ɂ͖<C982><CD96>肪<EFBFBD><E882AA><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>\\E<>Ɨ]<5D><><EFBFBD>ȂQ<C882><51><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>镶<EFBFBD><E995B6><EFBFBD><EFBFBD><EFBFBD>łȂ<C582><C882>ƃ}<7D>b<EFBFBD>`<60><><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD>ǂ<EFBFBD><C782><EFBFBD><EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>A\<5C><><EFBFBD>ǂ<EFBFBD><C782>ɓY<C993><59><EFBFBD>邩<EFBFBD><E982A9><EFBFBD>l<EFBFBD><6C><EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD><76><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂ŁA<C581><41><EFBFBD><EFBFBD><EFBFBD>̎<EFBFBD><CC8E>|<7C>ɍ<EFBFBD><C98D><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>\<5C><><EFBFBD>͗Ⴆ<CD97>A<CE81><41><EFBFBD>̂悤<CC82>ɂ<EFBFBD><C982>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><F182B182><EFBFBD>Shift-JIS<49>݂̂ɗL<C997><4C><EFBFBD>ł<EFBFBD><C582>B
|
|||
|
$digit = '(?:[0-9]|\x82[\x4F-\x58])'; # <20><><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD>p<EFBFBD>ƑS<C691>p<EFBFBD>j
|
|||
|
$upper = '(?:[A-Z]|\x82[\x60-\x79])'; # <20>A<EFBFBD><41><EFBFBD>t<EFBFBD>@<40>x<EFBFBD>b<EFBFBD>g<EFBFBD>啶<EFBFBD><E595B6><EFBFBD>i<EFBFBD><69><EFBFBD>p<EFBFBD>ƑS<C691>p<EFBFBD>j
|
|||
|
$lower = '(?:[a-z]|\x82[\x81-\x9A])'; # <20>A<EFBFBD><41><EFBFBD>t<EFBFBD>@<40>x<EFBFBD>b<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD>p<EFBFBD>ƑS<C691>p<EFBFBD>j
|
|||
|
$space = '(?:[\ \n\r\t\f]|\x81\x40)'; # <20><EFBFBD><F3949295><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD>p<EFBFBD>ƑS<C691>p<EFBFBD>j
|
|||
|
$ascii = '[\x00-\x7F]'; # ASCII<49><49><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
# <20>S<EFBFBD>p<EFBFBD><70><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD>_<EFBFBD>E<EFBFBD><45><EFBFBD><EFBFBD><EFBFBD>_<EFBFBD>E<EFBFBD>x<EFBFBD>莚<EFBFBD><E88E9A><EFBFBD>܂ށj
|
|||
|
$hiraZ = '(?:\x82[\x9F-\xF1]|\x81[\x4A\x4B\x54\x55])';
|
|||
|
|
|||
|
# <20>S<EFBFBD>p<EFBFBD>Љ<EFBFBD><D089><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E<EFBFBD><45><EFBFBD>_<EFBFBD>E<EFBFBD><45><EFBFBD><EFBFBD><EFBFBD>_<EFBFBD>E<EFBFBD>x<EFBFBD>莚<EFBFBD><E88E9A><EFBFBD>܂ށj
|
|||
|
$kataZ = '(?:\x83[\x40-\x7E\x80-\x96]|\x81[\x5B\x4A\x4B\x52\x53])';
|
|||
|
|
|||
|
# <20><><EFBFBD>p<EFBFBD>Љ<EFBFBD><D089><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD>p<EFBFBD><70><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E<EFBFBD><45><EFBFBD>Ǔ_<C793><5F><EFBFBD>܂ށj
|
|||
|
$kataH = '[\xA1-\xDF]';
|
|||
|
|
|||
|
$onebyte = '[\x00-\x7F\xA1-\xDF]';
|
|||
|
$twobyte = '(?:[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
$char = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
|
|||
|
# JIS<49><53><EFBFBD><EFBFBD>
|
|||
|
$all_JIS = '(?:[\x00-\x7f\xa1-\xdf]|'.
|
|||
|
. '\x81[\x40-\x7e\x80-\xac\xb8-\xbf\xc8-\xce\xda-\xe8\xf0-\xf7\xfc]|'
|
|||
|
. '\x82[\x4f-\x58\x60-\x79\x81-\x9a\x9f-\xf1]|'
|
|||
|
. '\x83[\x40-\x7e\x80-\x96\x9f-\xb6\xbf-\xd6]|'
|
|||
|
. '\x84[\x40-\x60\x70-\x7e\x80-\x91\x9f-\xbe]|'
|
|||
|
. '\x88[\x9f-\xfc]|\x98[\x40-\x72\x9f-\xfc]|\xea[\x40-\x7e\x80-\xa4]|'
|
|||
|
. '[\x89-\x97\x99-\x9f\xe0-\xe9][\x40-\x7e\x80-\xfc])';
|
|||
|
|
|||
|
# <20>x<EFBFBD><78><EFBFBD>_<EFBFBD><5F><EFBFBD>`<60><><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
# NEC<45><43><EFBFBD>ꕶ<EFBFBD><EA95B6>
|
|||
|
$NEC_special = '(?:\x87[\x40-\x5d\x5f-\x75\x7e\x80-\x9c])';
|
|||
|
|
|||
|
# NEC<45>I<EFBFBD><49>IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
$NEC_IBM_ext = '(?:\xed[\x40-\x7e\x80-\xfc]|\xee[\x40-\x7e\x80-\xec\xef-\xfc])';
|
|||
|
|
|||
|
# IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
$IBM_ext = '(?:[\xfa-\xfb][\x40-\x7e\x80-\xfc]|\xfc[\x40-\x4b])';
|
|||
|
|
|||
|
|
|||
|
Shift-JIS<49>Ń}<7D>b<EFBFBD>`<60><><EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD>ɂ́A<CD81>Q<EFBFBD>̖<C282><CC96>肪<EFBFBD><E882AA><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><EFBFBD>ASCII<EFBFBD>̗̈<EFBFBD><EFBFBD>ɓ<EFBFBD><EFBFBD>镶<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂ŁAASCII<EFBFBD><EFBFBD><EFBFBD>܂ރp<EFBFBD>^<5E>[<5B><><EFBFBD>Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>镶<EFBFBD><EFBFBD><EFBFBD>̑<EFBFBD><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD>Ǝ<EFBFBD><EFBFBD>̕<EFBFBD><EFBFBD><EFBFBD><EFBFBD>̑<EFBFBD><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><EFBFBD><EFBFBD>P<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><EFBFBD>邩<EFBFBD>̂悤<EFBFBD>Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>҂<EFBFBD>EUC-JP<4A>ł<EFBFBD><C582>N<EFBFBD><4E><EFBFBD>肤<EFBFBD><E882A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>iUTF-8<>Ȃ<EFBFBD><C882>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>͂<EFBFBD><CD82>ꂪ<EFBFBD><EA82AA><EFBFBD><EFBFBD><EFBFBD>Ȃ̂ł͂Ȃ<CD82><C882>j<EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>O<EFBFBD>҂<EFBFBD>EUC-JP<4A>ł͋N<CD8B><4E><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>AShift-JIS<49>ł͋N<CD8B><4E><EFBFBD>肤<EFBFBD><E882A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>h<EFBFBD><68><EFBFBD><EFBFBD><EFBFBD>@<40>́A<CD81><41><EFBFBD>Ǔ<EFBFBD><C793><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃł<C682><C582><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>K<EFBFBD>\<5C><><EFBFBD>̒<EFBFBD><CC92>ɁA<C981><41><EFBFBD>ɐ擪<C990><E693AA><EFBFBD>܂܂<DC82><DC82>邱<EFBFBD>Ƃł<C682><C582>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
# <20>擪<EFBFBD><E693AA><EFBFBD><EFBFBD><EFBFBD>}<7D>b<EFBFBD>`
|
|||
|
$str =~ /^$char*?(?:$pat)/;
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̃}<7D>b<EFBFBD>`<60>ł͂<C582><CD82>܂<EFBFBD><DC82>s<EFBFBD><73><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B"<22>E" =~ /E$/<2F><><EFBFBD>l<EFBFBD><6C><EFBFBD><EFBFBD><EFBFBD>Ώ\<5C><><EFBFBD>ł<EFBFBD><C582>傤<EFBFBD>B<EFBFBD>܂<EFBFBD><DC82>A"\x8E" x 30 . "E"<22><>$str = "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E"<22>ł<EFBFBD><C582>邪<EFBFBD>A"\x8E" x 31 . "E"<22><>$str = "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E"<22>ł<EFBFBD><C582><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>AShift-JIS<49><53><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>납<EFBFBD><EB82A9><EFBFBD>蕪<D882><E895AA><EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>ȕ<D882><C895>@<40>͂Ȃ<CD82><C882>ƍl<C68D><6C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD>Ƃ<EFBFBD><EFBFBD>A<EFBFBD>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>o<EFBFBD>C<EFBFBD>g [\x00-\x3F\x7F] <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><C282>鏊<EFBFBD>܂ŁA<C581>ɒ[<5B>ȏꍇ<C88F>͕<EFBFBD><CD95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̍ŏ<CC8D><C58F>܂ŃX<C583>L<EFBFBD><4C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>Ƃ킩<C682>炸<EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ǂ<EFBFBD> lookbehind <20>̐<EFBFBD><CC90>K<EFBFBD>\<5C><> (?<=PATTERN)<29>͍<EFBFBD><CD8D>̏<EFBFBD><CC8F>A<EFBFBD>s<EFBFBD>蒷<EFBFBD>ɂł<C982><C582>܂<EFBFBD><DC82><EFBFBD><EFBFBD>i(?<=(?:\A|[\x00-\x3F\x7F])$char*) <20>Ƃ͂ł<CD82><C582>Ȃ<EFBFBD><C882>j<EFBFBD>̂ŁA<C581>擪<EFBFBD><E693AA><EFBFBD>當<EFBFBD><E795B6><EFBFBD>P<EFBFBD>ʂł炵<CE82>Ă<EFBFBD><C482>珈<EFBFBD><E78F88><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82>A<EFBFBD><41><EFBFBD>ǂ͊ȕւȂ̂<C882><CC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>O<EFBFBD><EFBFBD><EFBFBD>[<5B>o<EFBFBD><6F><EFBFBD>}<7D>b<EFBFBD>`
|
|||
|
<EFBFBD>O<EFBFBD><EFBFBD><EFBFBD>[<5B>o<EFBFBD><6F><EFBFBD>}<7D>b<EFBFBD>` /g <20>̏ꍇ<CC8F>́A\G<><47><EFBFBD>g<EFBFBD><67><EFBFBD>܂<EFBFBD><DC82>傤<EFBFBD>B\G<>͑O<CD91><4F><EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̖<EFBFBD><CC96><EFBFBD><EFBFBD><EFBFBD><EFBFBD>w<EFBFBD><77><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>̗<EFBFBD><EFBFBD>ł́A<EFBFBD>u<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD>̂<EFBFBD><EFBFBD>]<5D>܂<EFBFBD><DC82><EFBFBD><EFBFBD>̂ł<CC82><C582><EFBFBD><EFBFBD>A\G<><47><EFBFBD>Ȃ<EFBFBD><C882>̂ŁA<C581>擪<EFBFBD><E693AA><EFBFBD><EFBFBD><EFBFBD>J<EFBFBD>n<EFBFBD><6E><EFBFBD>ĕ<EFBFBD><C495><EFBFBD><EFBFBD><EFBFBD><EFBFBD>S<EFBFBD>̂܂ʼn<DC82><C589>тă}<7D>b<EFBFBD>`<60><><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƁA<C681><41><EFBFBD>߂Đ擪<C490><E693AA><EFBFBD><EFBFBD><EFBFBD>P<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD>i<EFBFBD>ʒu<CA92><75><EFBFBD><EFBFBD><EFBFBD>X<EFBFBD>L<EFBFBD><4C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĊJ<C48A><4A><EFBFBD><EFBFBD><EFBFBD>̂ŁA<C581><41><EFBFBD>ꂽ<EFBFBD>ʒu<CA92>Ȃ̂Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>ƍl<C68D><6C><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>܂<EFBFBD><DC82>B\G<><47><EFBFBD>g<EFBFBD><67><EFBFBD>Ȃ<EFBFBD><C882>ƁA<C681>Ԉ<EFBFBD><D488><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʒu<CA92>Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD>邩<EFBFBD><E982A9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɁA<C981>]<5D>v<EFBFBD>ȍČ<C88D><C48C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂ŁA<C581><41><EFBFBD>Ԃ<EFBFBD><D482><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
$str = '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E<EFBFBD><45><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E';
|
|||
|
$pat = '<27>E';
|
|||
|
$str =~ s/\G($char*?)($pat)/${1}E/og;
|
|||
|
# '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E<EFBFBD><45><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E' <20>̂܂܁i<DC81><69><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>j<EFBFBD>B
|
|||
|
|
|||
|
\G<><47><EFBFBD>t<EFBFBD><74><EFBFBD>Ȃ<EFBFBD><C882>ꍇ
|
|||
|
|
|||
|
$str = '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E<EFBFBD><45><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E';
|
|||
|
$pat = '<27>E';
|
|||
|
$str =~ s/($char*?)($pat)/${1}E/og; # '<27>E' <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 'E' <20>ɒu<C992><75>
|
|||
|
print $str;
|
|||
|
# '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E<EFBFBD><45><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E' <20>ɂȂ<C982><C882>Ă<EFBFBD><C482>܂<EFBFBD><DC82>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>j<EFBFBD>B
|
|||
|
|
|||
|
<EFBFBD>@<40>@<40>@<40>@<40><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E<EFBFBD><45><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E
|
|||
|
<EFBFBD>P<EFBFBD><EFBFBD><EFBFBD>ځ@<40><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/ <20>i<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD>Ȃ<EFBFBD><C882>j
|
|||
|
<EFBFBD>Q<EFBFBD><EFBFBD><EFBFBD>ځ@|<7C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>||||||||| <20>i<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>̂Œu<C592><75><EFBFBD>j
|
|||
|
<EFBFBD>R<EFBFBD><EFBFBD><EFBFBD>ځ@|||||||||<7C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/ <20>i<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD>Ȃ<EFBFBD><C882>j
|
|||
|
<EFBFBD>S<EFBFBD><EFBFBD><EFBFBD>ځ@||||||||||<7C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>i<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>̂Œu<C592><75><EFBFBD>j
|
|||
|
|
|||
|
<EFBFBD>@<40>}<7D><><EFBFBD>F <20><><EFBFBD>@$char<61><72><EFBFBD>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ƀ}<7D>b<EFBFBD>`
|
|||
|
<EFBFBD>@<40>@<40>@<40>@<40>@/<2F>@$char<61><72><EFBFBD>P<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ƀ}<7D>b<EFBFBD>`
|
|||
|
<EFBFBD>@<40>@<40>@<40>@ <20>ˁ@$pat<61><74><EFBFBD>}<7D>b<EFBFBD>`
|
|||
|
<EFBFBD>@<40>@<40>@<40>@<40>@|<7C>@<40>X<EFBFBD>L<EFBFBD><4C><EFBFBD><EFBFBD><EFBFBD>͈̔͊O
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>p<EFBFBD>^<5E>[<5B><><EFBFBD><EFBFBD><EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>ꍇ<EFBFBD>ɂ́A<CD81><41><EFBFBD>ӂ<EFBFBD><D382>K<EFBFBD>v<EFBFBD>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD>̗<EFBFBD><CC97>́A<CD81>u<EFBFBD>A<EFBFBD>v<EFBFBD>̑O<CC91><4F> 'Z' <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂ł<CC82><C582>B<EFBFBD><42><EFBFBD>P<EFBFBD><50><EFBFBD>͕<EFBFBD><CD95><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>i'<27>A' : 0x8341<34>ɑ<C991><CE82><EFBFBD>'<27><>A' : 0x8B8341<34><31><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ă}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>j<EFBFBD><6A><EFBFBD>h<EFBFBD><68><EFBFBD>ł<EFBFBD><C582>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD>Q<EFBFBD><51><EFBFBD>́A<CD81><41><EFBFBD>̕<EFBFBD><CC95>@<40>Łu<C581><75><EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><76><EFBFBD>h<EFBFBD><68><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>̂ł<CC82><C582><EFBFBD><EFBFBD>AZ <20>ւ̒u<CC92><75><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>ċN<C48B><4E><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͑<EFBFBD><EFBFBD>R<EFBFBD><EFBFBD><EFBFBD>̂悤<EFBFBD>ɂ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><EFBFBD>B<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A<EFBFBD><EFBFBD><EFBFBD>Q<EFBFBD><EFBFBD><EFBFBD>ł́u<EFBFBD>Ȃ<EFBFBD><EFBFBD>H<EFBFBD>v<EFBFBD>ɏ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>悤<EFBFBD>ɁA<EFBFBD>u<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>邩<EFBFBD><EFBFBD><EFBFBD>ƍl<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
$str = "<22>A<EFBFBD>C<EFBFBD>E<EFBFBD>G<EFBFBD>A<EFBFBD>A<EFBFBD>C<EFBFBD>E<EFBFBD>A<EFBFBD><41>A";
|
|||
|
|
|||
|
print +($temp = $str) =~ s/(?=<3D>A)/Z/g, $temp;
|
|||
|
|
|||
|
print +($temp = $str) =~ s/\G($char*?)(?=<3D>A)/${1}Z/g, $temp;
|
|||
|
|
|||
|
print +($temp = $str) =~ s/\G(\A|$char+?)(?=<3D>A)/${1}Z/g, $temp;
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
5 Z<>A<EFBFBD>C<EFBFBD>E<EFBFBD>GZ<47>AZ<41>A<EFBFBD>C<EFBFBD>EZ<45>A<EFBFBD>Z<EFBFBD>A
|
|||
|
7 Z<>A<EFBFBD>C<EFBFBD>E<EFBFBD>GZZ<5A>AZZ<5A>A<EFBFBD>C<EFBFBD>EZZ<5A>A<EFBFBD><41>A
|
|||
|
4 Z<>A<EFBFBD>C<EFBFBD>E<EFBFBD>GZ<47>AZ<41>A<EFBFBD>C<EFBFBD>EZ<45>A<EFBFBD><41>A
|
|||
|
|
|||
|
<EFBFBD>Ȃ<EFBFBD><EFBFBD>H
|
|||
|
<20>A <20>C <20>E <20>G <20>A <20>A <20>C <20>E <20>A <20><> A
|
|||
|
1 \G Z
|
|||
|
2 \G$char$char$char$char Z
|
|||
|
3 \G Z
|
|||
|
4 \G$char Z
|
|||
|
5 <20>ȉ<EFBFBD><C889>A<EFBFBD>ȗ<EFBFBD>
|
|||
|
|
|||
|
<EFBFBD>܂<EFBFBD><EFBFBD>A<EFBFBD>O<EFBFBD><EFBFBD><EFBFBD>[<5B>o<EFBFBD><6F><EFBFBD>}<7D>b<EFBFBD>`<60>ł́A<CD81>}<7D>b<EFBFBD>`<60><><EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>łȂ<C582><C882>p<EFBFBD>^<5E>[<5B><><EFBFBD>̑O<CC91>ɂ<EFBFBD>\G($char*?)<29><><EFBFBD>A<EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>p<EFBFBD>^<5E>[<5B><><EFBFBD>̑O<CC91>ɂ<EFBFBD>\G(\A|$char+?)<29><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD><76><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>H<EFBFBD>j<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>ꍇ<EFBFBD><EA8D87><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
$str = "0123000123";
|
|||
|
|
|||
|
print +($temp = $str) =~ s/0*/Z/g, $temp;
|
|||
|
|
|||
|
print +($temp = $str) =~ s/\G($char*?)0*/${1}Z/g, $temp;
|
|||
|
|
|||
|
print +($temp = $str) =~ s/\G(\A|$char+?)0*/${1}Z/g, $temp;
|
|||
|
__END__
|
|||
|
9 ZZ1Z2Z3ZZ1Z2Z3Z
|
|||
|
14 ZZ1ZZ2ZZ3ZZ1ZZ2ZZ3ZZ
|
|||
|
7 Z1Z2Z3Z1Z2Z3Z
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A<EFBFBD>p<EFBFBD>^<5E>[<5B><><EFBFBD><EFBFBD><EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂ł<CC82><C582><EFBFBD><EFBFBD>ƁA/g<><67><EFBFBD><EFBFBD><EFBFBD>̏<EFBFBD><CC8F>Ŗ<EFBFBD><C596><EFBFBD><EFBFBD>ɑ<EFBFBD><C991><EFBFBD><EFBFBD>݂<EFBFBD><DD82>ďI<C48F><49><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>Ȃ<EFBFBD><C882>̂<EFBFBD><CC82>h<EFBFBD><68><EFBFBD><EFBFBD><EFBFBD>߁Aperl<72>́A<CD81>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>I<EFBFBD>ɐi<C990>߂Ă<DF82><C482><EFBFBD><EFBFBD>̂ł<CC82><C582><EFBFBD><EFBFBD>icf. perlre, Repeated patterns matching zero-length substring<6E>j<EFBFBD>A<EFBFBD><41><EFBFBD>̐i<CC90>ߕ<EFBFBD><DF95>̐^<5E><><EFBFBD>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD>P<EFBFBD>ʂł͂Ȃ<CD82><C882>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>P<EFBFBD>ʂŐi<C590>ނ<EFBFBD><DE82>́j<CC81><6A><EFBFBD>A\G($char*?)<29><>\G(\A|$char+?)<29>ł́A<CD81><41><EFBFBD>܂<EFBFBD><DC82>ł<EFBFBD><C582>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>邱<EFBFBD>Ƃ́A<CD81>قƂ<D982><C682>ǂȂ<C782><C882>ƍl<C68D><6C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>̂ŁA<C581>C<EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD>͂Ȃ<CD82><C882>̂<EFBFBD><CC82><EFBFBD><EFBFBD>m<EFBFBD><6D><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɂ<EFBFBD><C982>݁j<DD81>B
|
|||
|
<EFBFBD>A<EFBFBD><EFBFBD><EFBFBD>t<EFBFBD>@<40>x<EFBFBD>b<EFBFBD>g<EFBFBD>̑啶<CC91><E595B6><EFBFBD>Ə<EFBFBD><C68F><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
Shift-JIS<49>̂Q<CC82>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><CC92>ɂ́A<CD81><41><EFBFBD>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67>ASCII<49>ʼnp<C589><70><EFBFBD>ɓ<EFBFBD><C993><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>̂<EFBFBD><CC82>߁A<DF81><EFBFBD> uc, lc <20><><EFBFBD>A<EFBFBD><41><EFBFBD>^<5E><><EFBFBD><EFBFBD> \U, \L<><4C><EFBFBD>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̈ꕔ<CC88><EA9594><EFBFBD>ϊ<EFBFBD><CF8A><EFBFBD><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ucfirst, lcfirst <20><> <20><><EFBFBD>^<5E><><EFBFBD><EFBFBD> \u, \l <20>͖<EFBFBD><CD96><EFBFBD><EFBFBD>ƂȂ<C682><C882>Ȃ<EFBFBD><C882>j<EFBFBD>Am//i <20><> s///i<>Ȃǂ<C882> /i<>C<EFBFBD><43><EFBFBD>q<EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>ĈႤ<C488><E182A4><EFBFBD><EFBFBD><EFBFBD>Ȃ̂Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82><EFBFBD><EFBFBD>肷<EFBFBD>邱<EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
Shift-JIS<49><53><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ɋ܂܂<DC82><DC82><EFBFBD>ASCII<49>̉p<CC89><70><EFBFBD><EFBFBD><EFBFBD>啶<EFBFBD><E595B6><EFBFBD>܂<EFBFBD><DC82>͏<EFBFBD><CD8F><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɑ<EFBFBD><C991><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>A<EFBFBD>Ⴆ<EFBFBD>A<CE81><41><EFBFBD>̂悤<CC82>ȃT<C883>u<EFBFBD><75><EFBFBD>[<5B>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ύ<EFBFBD><CE8E><EFBFBD><EFBFBD>ł<EFBFBD><C582>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
$char = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
|
|||
|
lc("PERL<52>v<EFBFBD><76><EFBFBD>O<EFBFBD><4F><EFBFBD>~<7E><><EFBFBD>O"); # 'perl<72>v<EFBFBD><76><EFBFBD>o<EFBFBD><6F><EFBFBD>~<7E><><EFBFBD>o'
|
|||
|
tolower("PERL<52>v<EFBFBD><76><EFBFBD>O<EFBFBD><4F><EFBFBD>~<7E><><EFBFBD>O"); # 'perl<72>v<EFBFBD><76><EFBFBD>O<EFBFBD><4F><EFBFBD>~<7E><><EFBFBD>O'
|
|||
|
|
|||
|
sub tolower {
|
|||
|
my $str = $_[0];
|
|||
|
$str =~ s/\G($char*?)([A-Z]+)/$1\L$2/g;
|
|||
|
$str;
|
|||
|
}
|
|||
|
|
|||
|
sub toupper {
|
|||
|
my $str = $_[0];
|
|||
|
$str =~ s/\G($char*?)([a-z]+)/$1\U$2/g;
|
|||
|
$str;
|
|||
|
}
|
|||
|
|
|||
|
<EFBFBD>P<EFBFBD>[<5B>X<EFBFBD><58><EFBFBD><EFBFBD><EFBFBD>̃}<7D>b<EFBFBD>` /i <20>̏ꍇ<CC8F>́A<CD81>Ⴆ<EFBFBD><E182A6> '<27>G'<27>̑<EFBFBD><CC91><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> 'G' <20>ł<EFBFBD><C582><EFBFBD><EFBFBD>A'<27>g'<27>̑<EFBFBD><CC91><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> 'g' <20>ł<EFBFBD><C582>邱<EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>A'<27>G' =~ /<2F>g/i<>̓}<7D>b<EFBFBD>`<60><><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD><EFBFBD><EFBFBD>AShift-JIS<49>Ő<EFBFBD><C590>m<EFBFBD>ȃ}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A/i<>C<EFBFBD><43><EFBFBD>q<EFBFBD>͎g<CD8E><67><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ł<EFBFBD><C582>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɁA<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ɋ܂܂<EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><EFBFBD><EFBFBD>t<EFBFBD>@<40>x<EFBFBD>b<EFBFBD>g<EFBFBD>i<EFBFBD><69><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̑<EFBFBD><CC91>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>j<EFBFBD><6A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>܂<EFBFBD><DC82>͑啶<CD91><E595B6><EFBFBD>A<EFBFBD>ǂ<EFBFBD><C782>炩<EFBFBD>j<EFBFBD>ɓ<EFBFBD><C993>ꂵ<EFBFBD>ă}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>Btolower<65>̒<EFBFBD><CC92>`<60>͏<EFBFBD><CD8F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
$char = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
|
|||
|
$lcstr = tolower($str);
|
|||
|
$lckey = tolower(quotemeta $key);
|
|||
|
|
|||
|
if ($lcstr =~ /^$char*?$lckey/) {
|
|||
|
print "matched";
|
|||
|
}
|
|||
|
else {
|
|||
|
print "not matched";
|
|||
|
}
|
|||
|
|
|||
|
<EFBFBD>܂<EFBFBD><EFBFBD>͖<EFBFBD><EFBFBD>ߍ<EFBFBD><EFBFBD>ݏC<EFBFBD><EFBFBD><EFBFBD>q (?ismx-ismx) <20><><EFBFBD>p<EFBFBD><70><EFBFBD>Ă<EFBFBD><C482>D<EFBFBD><44><EFBFBD><EFBFBD><EFBFBD>ʂ<CA82><F093BE82><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
"<22><><EFBFBD>P<EFBFBD><50>Perl<72>u<EFBFBD>k<EFBFBD>̂<EFBFBD><CC82>ē<EFBFBD>" =~ /^$char*?PERL<52>u<EFBFBD>K/i # <20>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD>j
|
|||
|
"<22><><EFBFBD>Q<EFBFBD><51>Perl<72>u<EFBFBD>k<EFBFBD>̂<EFBFBD><CC82>ē<EFBFBD>" =~ /^$char*?((?i)PERL)<29>u<EFBFBD>K/ # <20>}<7D>b<EFBFBD>`<60><><EFBFBD>Ȃ<EFBFBD><C882>i<EFBFBD>ǂ<EFBFBD><C782>j
|
|||
|
"<22><><EFBFBD>R<EFBFBD><52>Perl<72>u<EFBFBD>K<EFBFBD>̂<EFBFBD><CC82>ē<EFBFBD>" =~ /^$char*?((?i)PERL)<29>u<EFBFBD>K/ # <20>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>ǂ<EFBFBD><C782>j
|
|||
|
|
|||
|
<EFBFBD>S<EFBFBD>p<EFBFBD>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD>A<EFBFBD><EFBFBD><EFBFBD>t<EFBFBD>@<40>x<EFBFBD>b<EFBFBD>g<EFBFBD>̃P<CC83>[<5B>X<EFBFBD><58><EFBFBD><EFBFBD><EFBFBD>́A<CD81>I<EFBFBD><49><EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>܂<EFBFBD><DC82>i<EFBFBD><69><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>ς<EFBFBD><CF82>ρj<CF81>B'<27>`'<27>̑<EFBFBD><CC91>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> '`' <20>Ȃ̂<C882><CC82>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƒ<EFBFBD><C692>ӂł<D382><C582>im`` <20>Ȃǂ̂Ƃ<CC82><C682>v<EFBFBD><76><EFBFBD>I<EFBFBD>G<EFBFBD><47><EFBFBD>[<5B>ɂȂ<C982><C882>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>b<EFBFBD>N<EFBFBD>N<EFBFBD>H<EFBFBD>[<5B>g<EFBFBD><67><EFBFBD>g<EFBFBD><67><EFBFBD>Ӗ<EFBFBD><D396>͓<EFBFBD><CD93>ɂȂ<C982><C882>j<EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>I<EFBFBD>ɂ̓<C982><CD83>e<EFBFBD><65><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD>Z<EFBFBD>q<EFBFBD><71><EFBFBD>u<EFBFBD><75><EFBFBD><EFBFBD><EFBFBD>Z<EFBFBD>q<EFBFBD>ɒ<EFBFBD><C992>ږ<EFBFBD><DA96>ߍ<EFBFBD><DF8D>ނ͔̂<CC82><CD94><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
/(?:<3A>o|<7C><>)(?:<3A>d|<7C><>)(?:<3A>q|<7C><>)(?:<3A>k|<7C><>)/;
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>̑<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɂ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȃT<EFBFBD>u<EFBFBD><EFBFBD><EFBFBD>[<5B>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă݂Ă<DD82><C482>悢<EFBFBD><E682A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
$CharRE = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
|
|||
|
$pat = make_regexp_ignorecase("<22>o<EFBFBD>d<EFBFBD>q<EFBFBD>k<EFBFBD>u<EFBFBD>K");
|
|||
|
print "<22><><EFBFBD>T<EFBFBD><54><EFBFBD>o<EFBFBD><6F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>u<EFBFBD>K<EFBFBD><4B>" =~ /^$char*?$pat/ ? "OK": "NOT";
|
|||
|
|
|||
|
sub make_regexp_ignorecase {
|
|||
|
my $str = $_[0];
|
|||
|
$str =~ s/\G([A-Za-z]+|$CharRE)/
|
|||
|
my $c = ord $1;
|
|||
|
if($c == 0x82) {
|
|||
|
my $v = vec($1,1,8);
|
|||
|
0x81 <= $v && $v <= 0x9A ? sprintf('\\x82[\\x%2x\\x%2x]', $v, $v-33) :
|
|||
|
0x60 <= $v && $v <= 0x79 ? sprintf('\\x82[\\x%2x\\x%2x]', $v, $v+33) :
|
|||
|
quotemeta($1);
|
|||
|
}
|
|||
|
elsif(0x41 <= $c && $c <= 0x5A || 0x61 <= $c && $c <= 0x7A) {"(?:(?i)$1)"}
|
|||
|
else {quotemeta($1)}
|
|||
|
/geo;
|
|||
|
$str;
|
|||
|
}
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɑ<EFBFBD><EFBFBD>鐳<EFBFBD>K<EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>\<5C><><EFBFBD>́APerl <20>ɂƂ<C982><C682>Č<EFBFBD><C48C><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>݂Ƃ<DD82><C682><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>\<5C><><EFBFBD>̐<EFBFBD><CC90><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>āA*, +, {min,max} <20>Ȃǂ̗ʎw<CA8E><77><EFBFBD>q<EFBFBD><71><EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD>J<EFBFBD><4A><EFBFBD>Ԃ<EFBFBD><D482><EFBFBD><EFBFBD>̏<F1909482><CC8F><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>肪<EFBFBD><E882AA><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B(<28>ڍׂ<DA8D> perlre <20>Q<EFBFBD>Ƃ̂<C682><CC82><EFBFBD>)<29>B<EFBFBD><42><EFBFBD>̂<EFBFBD><CC82>߁A$char*? <20>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>\<5C><><EFBFBD>ɂ́A<CD81>댯<EFBFBD><EB8CAF><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>Ⴆ<EFBFBD>A<EFBFBD><EFBFBD><EFBFBD>̂悤<EFBFBD>ȃ}<7D>b<EFBFBD>`<60><><EFBFBD>O<EFBFBD><4F><EFBFBD>l<EFBFBD><6C><EFBFBD>Č<EFBFBD><C48C>܂<EFBFBD><DC82>傤<EFBFBD>B$str<74>́A<CD81>u<EFBFBD><75><EFBFBD>v<EFBFBD><76>10<31><30><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƂɁA<C981>u<EFBFBD>A<EFBFBD>CABC<42>v<EFBFBD><76><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>ꂽ<EFBFBD><EA82BD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD>̂悤<CC82>ȕ<EFBFBD><C895><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>u<EFBFBD>w<EFBFBD><77><EFBFBD>x<EFBFBD><78>10<31><30><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>v<EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ͕<C682><CD95><EFBFBD><EFBFBD>炸<EFBFBD>A<EFBFBD>C<EFBFBD>ӂ<EFBFBD> Shift-JIS <20>e<EFBFBD>L<EFBFBD>X<EFBFBD>g<EFBFBD>ł<EFBFBD><C582>낤<EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃɂ<C682><C982>܂<EFBFBD><DC82>j<EFBFBD><6A><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>p<EFBFBD>A<EFBFBD><41><EFBFBD>t<EFBFBD>@<40>x<EFBFBD>b<EFBFBD>g<EFBFBD><67><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><C282><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>܂<EFBFBD><DC82>傤<EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>ƁA<C681><41><EFBFBD>܂ł̍l<CC8D><6C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>炷<EFBFBD><E782B7><EFBFBD>ƁA<C681><41><EFBFBD>̂悤<CC82>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>悢<CE82>Ǝv<C68E><76><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
my $char = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
my $str = ('<27><>' x 100000) . '<27>A<EFBFBD>CABC';
|
|||
|
$str =~ /^$char*?([A-Z]+)/o;
|
|||
|
print $1;
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A<EFBFBD><EFBFBD><EFBFBD>ɂ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ẮA<EFBFBD>傫<EFBFBD>ȃG<EFBFBD><EFBFBD><EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>Ⴆ<EFBFBD>AWindows 98<39><38><EFBFBD><EFBFBD> Active Perl 522 <20><><EFBFBD>p<EFBFBD><70><EFBFBD><EFBFBD><EFBFBD>ꍇ<EFBFBD>AError: Runtime exception <20>Ƃ<EFBFBD><C682><EFBFBD> Perl <20>̃G<CC83><47><EFBFBD>[<5B>ɂȂ<C982><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD>܂<EFBFBD><DC82>AWindows 98<39><38><EFBFBD><EFBFBD>VC++ 6.0<EFBFBD>ŃR<EFBFBD><EFBFBD><EFBFBD>p<EFBFBD>C<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ꂽ Perl 5.6.1 <20><><EFBFBD>ƁA<C681>u<EFBFBD><75><EFBFBD>̃v<CC83><76><EFBFBD>O<EFBFBD><4F><EFBFBD><EFBFBD><EFBFBD>͕s<CD95><73><EFBFBD>ȏ<EFBFBD><C88F><EFBFBD><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD>̂ŋ<CC82><C58B><EFBFBD><EFBFBD>I<EFBFBD><49><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>`<60>v<EFBFBD>ȂǂƂ<C782><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>G<EFBFBD><47><EFBFBD>[<5B>ɂȂ<C982><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>̂悤<EFBFBD>Ȗ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><EFBFBD>邾<EFBFBD><EFBFBD><EFBFBD>h<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>߂ɂ́A<EFBFBD><EFBFBD><EFBFBD>̂悤<EFBFBD>ɂ<EFBFBD><EFBFBD>܂<EFBFBD><EFBFBD>B<EFBFBD>܂<EFBFBD><EFBFBD>A<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̐擪<EFBFBD><EFBFBD><EFBFBD>璲<EFBFBD>ׂĂ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ꍇ<EFBFBD>A<EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̕<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E<EFBFBD><EFBFBD><EFBFBD>ԈႦ<EFBFBD><EFBFBD><EFBFBD>̂́A<EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̑<EFBFBD><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD>̒<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E<EFBFBD>ƌ<EFBFBD><EFBFBD>F<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><EFBFBD>BShift-JIS<49>ł́A<CD81><41><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̑<EFBFBD><CC91><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD>́A[\x81-\x9F\xE0-\xFC] <20><><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD>邢<EFBFBD>́AEUC-JP <20>ɕϊ<C995><CF8A>\<5C>ȗ̈悾<CC88><E682BE><EFBFBD><EFBFBD><EFBFBD>l<EFBFBD><6C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A[\x81-\x9F\xE0-\xEF] <20><><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>ł<EFBFBD><C582>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>ȊO<C88A>̃o<CC83>C<EFBFBD>g<EFBFBD>̒<EFBFBD><CC92><EFBFBD><EFBFBD>́A<CD81>Ⴆ<EFBFBD>A0x41 <20>̒<EFBFBD><CC92><EFBFBD><EFBFBD>́A'A' <20>̒<EFBFBD><CC92>ォ<EFBFBD>A'<27>A' <20>̒<EFBFBD><CC92>ォ<EFBFBD>͕<EFBFBD><CD95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>A<F182AA81>m<EFBFBD><6D><EFBFBD>ɕ<EFBFBD><C995><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E<EFBFBD>ɂȂ<C982><C882>܂<EFBFBD><DC82>B<EFBFBD>]<5D><><EFBFBD>āA[\x81-\x9F\xE0-\xFC]+ <20>i<EFBFBD>܂<EFBFBD><DC82><EFBFBD> [\x81-\x9F\xE0-\xEF]+ <20>j<EFBFBD>̃o<CC83>C<EFBFBD>g<EFBFBD>i<EFBFBD><69><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>j<EFBFBD><6A><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>낾<EFBFBD><EB82BE><EFBFBD>ɒ<EFBFBD><C992>ӂ<EFBFBD><D382><EFBFBD><EFBFBD>悢<CE82><E682A2><EFBFBD>ƂɂȂ<C982><C882>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><EFBFBD>߁A<EFBFBD>ȉ<EFBFBD><EFBFBD>̂悤<EFBFBD>ɁA^$char*? <20>̑<EFBFBD><CC91><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> $Apad <20><><EFBFBD>g<EFBFBD><67><EFBFBD>A\G$char*? <20>̑<EFBFBD><CC91><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> $Gpad <20><><EFBFBD>p<EFBFBD><70><EFBFBD><EFBFBD><EFBFBD>A<CE81><41><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> [\x40-\x7E\x80\xA0-\xDF] <20>ŏI<C58F><49><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82>A<EFBFBD><41><EFBFBD>Ȃ<EFBFBD><C882>Ƃ<EFBFBD><C682>K<EFBFBD><4B><EFBFBD>ȊԊu<D48A>Łi<C581><69><EFBFBD><EFBFBD><EFBFBD>ɒB<C992><42><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ɂj<C981>o<EFBFBD><6F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<CE81>G<EFBFBD><47><EFBFBD>[<5B>ɂȂ炸<C882>ɏ<EFBFBD><C98F><EFBFBD><EFBFBD><EFBFBD><EFBFBD>邱<EFBFBD>Ƃ<EFBFBD><C682>ł<EFBFBD><C582>܂<EFBFBD><DC82>B<EFBFBD>i<EFBFBD>m<EFBFBD><6D><EFBFBD>I<EFBFBD>Ȗ<EFBFBD><C896><EFBFBD><EFBFBD>ł<EFBFBD><C582>̂ŁA<C581><41><EFBFBD>S<EFBFBD>ł͂<C582><CD82><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD>j
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
# <20><><EFBFBD><EFBFBD><F182BE82>}<7D>b<EFBFBD>`
|
|||
|
my $Apad = '(?:(?:\A|[\x00-\x80\xA0-\xDF])(?:[\x81-\x9F\xE0-\xFC]{2})*?)';
|
|||
|
my $str1 = ('<27><>' x 100000) . '<27>A<EFBFBD>CABC';
|
|||
|
$str1 =~ /$Apad([A-Z]+)/o;
|
|||
|
print "$1\n"; # "ABC" <20>ƕ\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
|
|||
|
# <20>O<EFBFBD><4F><EFBFBD>[<5B>o<EFBFBD><6F><EFBFBD>}<7D>b<EFBFBD>`
|
|||
|
my $Gpad = '(?:(?:\G|[\x00-\x80\xA0-\xDF])(?:[\x81-\x9F\xE0-\xFC]{2})*?)';
|
|||
|
|
|||
|
my $str2 = '<27><>' x 100000 . '<27>A<EFBFBD>CABC'. '<27><>' x 100000 . 'XYZ';
|
|||
|
my @array = $str2 =~ /$Gpad([A-Z]+)/go;
|
|||
|
print "@array\n"; # "ABC XYZ" <20>ƕ\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
|
|||
|
<EFBFBD>O<EFBFBD><EFBFBD><EFBFBD>̕ϊ<EFBFBD>
|
|||
|
<EFBFBD>x<EFBFBD><EFBFBD><EFBFBD>_<EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>[<5B>U<EFBFBD><55><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂ޕ<DC82><DE95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>𑼂̊<CC8A><C28B>ł<EFBFBD><C582><EFBFBD><EFBFBD>p<EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>悤<EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>ɂ́A<CD81>K<EFBFBD>ȕϊ<C895><CF8A><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD>ł<EFBFBD><C582>i<EFBFBD><69><EFBFBD>_<EFBFBD>A<EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̗̂<CC82><CC97>p<EFBFBD>͂قƂ<D982><C682>ǖ]<5D>߂<EFBFBD><DF82>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>炭<EFBFBD>͗ގ<CD97><DE8E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>╶<EFBFBD><E295B6><EFBFBD><EFBFBD><EFBFBD>ɕϊ<C995><CF8A><EFBFBD><EFBFBD>邱<EFBFBD>ƂɂȂ<C982><C882>ł<EFBFBD><C582>傤<EFBFBD>j<EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Perl<72>ł͒u<CD92><75><EFBFBD><EFBFBD><EFBFBD>Z<EFBFBD>q s/// <20><><EFBFBD>g<EFBFBD><67><EFBFBD>Δ<EFBFBD><CE94>r<EFBFBD>I<EFBFBD>e<EFBFBD>ՂɎ<D582><C98E><EFBFBD><EFBFBD>ł<EFBFBD><C582>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>炩<EFBFBD><EFBFBD><EFBFBD>߁A<EFBFBD>ǂ̊O<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ǂ<EFBFBD><EFBFBD>ϊ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>邩<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>ϊ<EFBFBD><CF8A>e<EFBFBD>[<5B>u<EFBFBD><75><EFBFBD><EFBFBD><EFBFBD>p<EFBFBD>ӂ<EFBFBD><D382>Ȃ<EFBFBD><C882>Ă͂Ȃ<CD82><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Perl<72>ł̓n<CD83>b<EFBFBD>V<EFBFBD><56><EFBFBD>ɂ<EFBFBD><C982>Ă<EFBFBD><C482><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>̌<EFBFBD><CC8C>̏<EFBFBD><CC8F><EFBFBD><EFBFBD><EFBFBD><EFBFBD>y<EFBFBD>ɂȂ<C982><C882>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>ł́A'w932_gai.txt'<27>Œ<EFBFBD><C592>`<60><><EFBFBD><EFBFBD><EFBFBD>AWindows codepage-932<33>R<EFBFBD>[<5B>h<EFBFBD>Ɋ<EFBFBD><C98A>Â<EFBFBD><C382><EFBFBD><EFBFBD>@<40><><EFBFBD>ˑ<EFBFBD><CB91><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́i<CC81><69><EFBFBD><EFBFBD><EFBFBD>I<EFBFBD>j<EFBFBD>ϊ<EFBFBD><CF8A>e<EFBFBD>[<5B>u<EFBFBD><75><EFBFBD><EFBFBD><EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ƃɂ<C682><C982>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>̃R<EFBFBD>[<5B>h<EFBFBD>ł́A<CD81>P<EFBFBD><50><EFBFBD><EFBFBD><EFBFBD>Â}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϊ<EFBFBD><CF8A>n<EFBFBD>b<EFBFBD>V<EFBFBD><56><EFBFBD>̃L<CC83>[<5B>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>ΑΉ<CE91><CE89><EFBFBD><EFBFBD><EFBFBD><EFBFBD>l<EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɒu<C992><75><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>łȂ<C582><C882><EFBFBD><EFBFBD><EFBFBD><CE82>̂܂c<DC8E><63><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
require 'w932_gai.txt'; # %table<6C>̒<EFBFBD><CC92>`<60>i<EFBFBD>s<EFBFBD><73><EFBFBD>S<EFBFBD>I<EFBFBD>j
|
|||
|
|
|||
|
$char = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
|
|||
|
$str =~ s/($char)/exists $table{$1} ? $table{$1} : $1/geo;
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>l<EFBFBD>ȏ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A<EFBFBD><EFBFBD><EFBFBD>̂悤<EFBFBD>ȏ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><EFBFBD>ł<EFBFBD><EFBFBD>܂<EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>O<EFBFBD><EFBFBD><EFBFBD>Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD>鐳<EFBFBD>K<EFBFBD>\<5C><> $gaiji<6A><69><EFBFBD>p<EFBFBD>ӂ<EFBFBD><D382><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD><76><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>ꂽ<EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>߂ɁA<C981><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̐<EFBFBD><CC90>K<EFBFBD>\<5C><><EFBFBD>ɂ<EFBFBD> \G <20><><EFBFBD>K<EFBFBD>v<EFBFBD>ł<EFBFBD><C582>B<EFBFBD>Ⴆ<EFBFBD>A$str = '<27><>@';<3B>̌<EFBFBD><CC8C><EFBFBD><EFBFBD>Q<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67> "\x87\x40" <20>ł<EFBFBD><C582><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>}<7D>b<EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>S<EFBFBD>z<EFBFBD><7A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD>܂<EFBFBD><DC82>A<EFBFBD><41><EFBFBD>~<7E><><EFBFBD><EFBFBD><EFBFBD>}<7D>b<EFBFBD>` ($char*?)<29><><EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD> $char <20><><EFBFBD>O<EFBFBD><4F><EFBFBD>Ƀ}<7D>b<EFBFBD>`<60><><EFBFBD>Ȃ<EFBFBD><C882>悤<EFBFBD>ύX<CF8D><58><EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD>͂<EFBFBD><CD82><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
require 'w932_gai.txt'; # %table<6C>̒<EFBFBD><CC92>`<60>i<EFBFBD>s<EFBFBD><73><EFBFBD>S<EFBFBD>I<EFBFBD>j
|
|||
|
|
|||
|
$char = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
$gaiji = '(?:[\x87][\x40-\x9c])';
|
|||
|
|
|||
|
$str =~ s/\G($char*?)($gaiji)/$1$table{$2}/g;
|
|||
|
|
|||
|
CP932<EFBFBD>d<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>̕ϊ<CC95>
|
|||
|
Microsoft Windows <20><><EFBFBD>{<7B><><EFBFBD>łň<C582><C588>ʓI<CA93>Ɏg<C98E>p<EFBFBD><70><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h<EFBFBD>y<EFBFBD>[<5B>W 932 (CP932) <20>ł́A<CD81><41><EFBFBD><EFBFBD><C282>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>d<EFBFBD><64><EFBFBD><EFBFBD><EFBFBD>Ē<EFBFBD><C492>`<60><><EFBFBD>ꂽ<EFBFBD><EA82BD><EFBFBD>ԂɂȂ<C982><C882>Ă<EFBFBD><C482>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>ŁA<C581><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>d<EFBFBD><64><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>Ƃ́AUnicode<64>̓<EFBFBD><CC93><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʒu<CA92>ɑΉ<C991><CE89>t<EFBFBD><74><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482>邱<EFBFBD>ƂƂ<C682><C682>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>Ⴆ<EFBFBD>ACP932 -> Unicode -> CP932 <20>̏<EFBFBD><CC8F>ŕϊ<C595><CF8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƁA<C681>d<EFBFBD><64><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>́A<CD81>ǂꂩ<C782><EA82A9><EFBFBD>ɑ<C282><C991><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD>̗D<CC97>揇<EFBFBD>ʂ<EFBFBD> JIS X 0208, NEC<45><43><EFBFBD>ꕶ<EFBFBD><EA95B6> (13<31><33>)<29>AIBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (115<31>`119<31><39>)<29>ANEC<45>I<EFBFBD><49>IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (89<38>`92<39><32>) <20>̏<EFBFBD><CC8F>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>āA'<27><>' <20>̏ꍇ<CC8F>ANEC<45><43><EFBFBD>ꕶ<EFBFBD><EA95B6><EFBFBD><EFBFBD> "\x87\x9A" <20><> IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> "\xFA\x5B" <20>́AJIS X 0208 <20><> "\x81\xE6" <20>ɂȂ<C982><C882>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ACP-932 <20>̃e<CC83>L<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD>A<EFBFBD>d<EFBFBD><64><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ǂꂩ<C782>ɑ<EFBFBD><C991><EFBFBD><EFBFBD>Ă<EFBFBD><C482>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>Ⴆ<EFBFBD><E182A6> "\x87\x9A" <20><> "\xFA\x5B" <20><><EFBFBD>܂܂<DC82><DC82>Ă<EFBFBD><C482><EFBFBD><EFBFBD>ƁA<C681>e<EFBFBD>L<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD>ڂŌ<DA82><C58C><EFBFBD><EFBFBD>ƈႢ<C688><E182A2><EFBFBD>Ȃ<EFBFBD><C882>̂ɁA"\x81\xE6" <20>Ō<EFBFBD><C58C><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><C282><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>ƂɂȂ<C982><C882>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>d<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>𑵂<EFBFBD><F091B582>郂<EFBFBD>W<EFBFBD><57><EFBFBD>[<5B><><EFBFBD>Ƃ<EFBFBD><C682>āAShiftJIS/CP932/Correct.pm <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>Ǝg<C68E><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Perl<72>̃y<CC83>[<5B>W<EFBFBD>ɖ߂<C996><DF82>Ό<EFBFBD><CE8C><EFBFBD><C282><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>܂<EFBFBD><EFBFBD>AShiftJIS/String.pm <20><> strtr() <20>܂<EFBFBD><DC82><EFBFBD> trclosure() <20><><EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>@<40><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>Ǝg<C68E><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Perl<72>̃y<CC83>[<5B>W<EFBFBD>ɖ߂<C996><DF82>Ό<EFBFBD><CE8C><EFBFBD><C282><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
|
|||
|
# (1) $necJIS -> $jisNEC (9<><39>)
|
|||
|
$necJIS = "\x87\x90\x87\x91\x87\x92\x87\x95\x87\x96\x87\x97\x87\x9A\x87\x9B\x87\x9C";
|
|||
|
# NEC<45><43><EFBFBD>ꕶ<EFBFBD><EA95B6><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>AJIS<49><53><EFBFBD><EFBFBD><EFBFBD>ɕϊ<C995><CF8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ׂ<EFBFBD><D782><EFBFBD>
|
|||
|
$jisNEC = "\x81\xE0\x81\xDF\x81\xE7\x81\xE3\x81\xDB\x81\xDA\x81\xE6\x81\xBF\x81\xBE";
|
|||
|
# JIS<49><53><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>ANEC<45><43><EFBFBD>ꕶ<EFBFBD><EA95B6><EFBFBD>ɏd<C98F><64><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
# (2) $necibmJIS -> $jisNECIBM (1<><31>)
|
|||
|
$necibmJIS = "\xEE\xF9";
|
|||
|
# NEC<45>I<EFBFBD><49>IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>AJIS<49><53><EFBFBD><EFBFBD><EFBFBD>ɕϊ<C995><CF8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ׂ<EFBFBD><D782><EFBFBD>
|
|||
|
$jisNECIBM = "\x81\xCA";
|
|||
|
# JIS<49><53><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>ANEC<45>I<EFBFBD><49>IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɏd<C98F><64><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
# (3) $ibmJIS -> $jisIBM (2<><32>)
|
|||
|
$ibmJIS = "\xFA\x54\xFA\x5B";
|
|||
|
# IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>AJIS<49><53><EFBFBD><EFBFBD><EFBFBD>ɕϊ<C995><CF8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ׂ<EFBFBD><D782><EFBFBD>
|
|||
|
$jisIBM = "\x81\xCA\x81\xE6";
|
|||
|
# JIS<49><53><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>AIBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɏd<C98F><64><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
# (4) $ibmNEC -> $necIBM (13<31><33>)
|
|||
|
$ibmNEC = "\xFA\x4A-\xFA\x53\xFA\x58\xFA\x59\xFA\x5A";
|
|||
|
# IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>ANEC<45><43><EFBFBD>ꕶ<EFBFBD><EA95B6><EFBFBD>ɕϊ<C995><CF8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ׂ<EFBFBD><D782><EFBFBD>
|
|||
|
$necIBM = "\x87\x54-\x87\x5D\x87\x8A\x87\x82\x87\x84";
|
|||
|
# NEC<45><43><EFBFBD>ꕶ<EFBFBD><EA95B6><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>AIBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɏd<C98F><64><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
# (5) $necibmIBM -> $ibmNECIBM (13<31><33>)
|
|||
|
$necibmIBM = "\xEE\xEF-\xEE\xF8\xEE\xFA\xEE\xFB\xEE\xFC";
|
|||
|
# NEC<45>I<EFBFBD><49>IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>AIBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɕϊ<C995><CF8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ׂ<EFBFBD><D782><EFBFBD>
|
|||
|
$ibmNECIBM = "\xFA\x40-\xFA\x49\xFA\x55\xFA\x56\xFA\x57";
|
|||
|
# IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD><EFBFBD>ANEC<45>I<EFBFBD><49>IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɏd<C98F><64><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
# (6) $necibmCJK -> $ibmCJK (360<36><30>)
|
|||
|
$necibmCJK = "\xED\x40-\xEE\xEC";
|
|||
|
# NEC<45>I<EFBFBD><49>IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̊<EFBFBD><CC8A><EFBFBD>
|
|||
|
$ibmCJK = "\xFA\x5C-\xFC\x4B";
|
|||
|
# IBM<42>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̊<EFBFBD><CC8A><EFBFBD>
|
|||
|
|
|||
|
use ShiftJIS::String qw(trclosure);
|
|||
|
|
|||
|
# <20>ϊ<EFBFBD><CF8A>p<EFBFBD>N<EFBFBD><4E><EFBFBD>[<5B>W<EFBFBD><57><EFBFBD>̐<EFBFBD><CC90><EFBFBD>
|
|||
|
$correctCP932 = trclosure(
|
|||
|
$necJIS.$necibmJIS.$ibmJIS.$ibmNEC.$necibmIBM.$necibmCJK, # from
|
|||
|
$jisNEC.$jisNECIBM.$jisIBM.$necIBM.$ibmNECIBM.$ibmCJK # to
|
|||
|
);
|
|||
|
|
|||
|
$result = $correctCP932->($source); # $source <20><><EFBFBD>ϊ<EFBFBD><CF8A><EFBFBD><EFBFBD><EFBFBD> $result <20><EFBFBD>
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>𐔂<EFBFBD><EFBFBD><EFBFBD>
|
|||
|
Shift-JIS<49><53><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>𐔂<EFBFBD><F0909482><EFBFBD><EFBFBD>ɂ́A<CD81>}<7D>b<EFBFBD>`<60><><EFBFBD>Z<EFBFBD>q<EFBFBD>𗘗p<F0979897><70><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>X<EFBFBD>J<EFBFBD><4A><EFBFBD>[<5B>R<EFBFBD><52><EFBFBD>e<EFBFBD>L<EFBFBD>X<EFBFBD>g<EFBFBD>Ő<EFBFBD><C590><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E18AB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>u<EFBFBD><75><EFBFBD><EFBFBD><EFBFBD>Z<EFBFBD>q<EFBFBD>𗘗p<F0979897><70><EFBFBD><EFBFBD><EFBFBD>ق<EFBFBD><D982><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ킩<C682><ED82A9><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD>XS<EFBFBD>ŏ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ق<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƒ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><EFBFBD>B<EFBFBD>܂<EFBFBD><EFBFBD>AXSUB<EFBFBD>͖<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɗ<EFBFBD><EFBFBD>p<EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD>Ă<EFBFBD><EFBFBD>悢<EFBFBD>ł<EFBFBD><EFBFBD>傤<EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
use Benchmark;
|
|||
|
|
|||
|
$char = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
$s = "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\0A<30>C<EFBFBD>e<EFBFBD>X<EFBFBD>g -";
|
|||
|
|
|||
|
timethese (100000, {
|
|||
|
le => q{
|
|||
|
($str = $s) =~ s/$char/0/go;
|
|||
|
$le = length $str;
|
|||
|
},
|
|||
|
sg => q{
|
|||
|
$sg = ($str = $s) =~ s/$char//go;
|
|||
|
},
|
|||
|
ab => q{
|
|||
|
$ab = 0;
|
|||
|
$ab++ while $s =~ /[^\x81-\x9F\xE0-\xFC]|../g;
|
|||
|
},
|
|||
|
ar => q{
|
|||
|
$ar = @{[ $s =~ /$char/go ]};
|
|||
|
},
|
|||
|
gr => q{
|
|||
|
$gr = grep defined, $s =~ /$char/go;
|
|||
|
},
|
|||
|
wh => q{
|
|||
|
$wh = 0;
|
|||
|
$wh++ while $s =~ /$char/go;
|
|||
|
},
|
|||
|
sj => q{
|
|||
|
$sj = sjslen($s);
|
|||
|
},
|
|||
|
xs => q{
|
|||
|
$xs = sjlength($s);
|
|||
|
},
|
|||
|
});
|
|||
|
|
|||
|
sub sjslen {
|
|||
|
my($str,$len,$i,$c,$blen);
|
|||
|
$str = shift;
|
|||
|
$blen = length $str;
|
|||
|
while ($i < $blen) {
|
|||
|
$c = vec($str, $i, 8);
|
|||
|
if (0x81 <= $c && $c <= 0x9F || 0xE0 <= $c && $c <= 0xFC){ $i++ }
|
|||
|
$i++,$len++;
|
|||
|
}
|
|||
|
$len;
|
|||
|
}
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
Benchmark: timing 100000 iterations of ab, ar, gr, le, sg, sj, wh, xs...
|
|||
|
ab: 4 wallclock secs ( 3.46 usr + 0.00 sys = 3.46 CPU) @ 28901.73/s
|
|||
|
ar: 6 wallclock secs ( 5.98 usr + 0.00 sys = 5.98 CPU) @ 16722.41/s
|
|||
|
gr: 6 wallclock secs ( 5.50 usr + 0.00 sys = 5.50 CPU) @ 18181.82/s
|
|||
|
le: 3 wallclock secs ( 2.09 usr + 0.00 sys = 2.09 CPU) @ 47846.89/s
|
|||
|
sg: 2 wallclock secs ( 1.92 usr + 0.00 sys = 1.92 CPU) @ 52083.33/s
|
|||
|
sj: 9 wallclock secs ( 8.57 usr + 0.00 sys = 8.57 CPU) @ 11668.61/s
|
|||
|
wh: 5 wallclock secs ( 4.78 usr + 0.00 sys = 4.78 CPU) @ 20920.50/s
|
|||
|
xs: 1 wallclock secs ( 0.38 usr + 0.00 sys = 0.38 CPU) @ 263157.89/s
|
|||
|
(warning: too few iterations for a reliable count)
|
|||
|
|
|||
|
XSUB
|
|||
|
int
|
|||
|
sjlength(arg)
|
|||
|
SV* arg
|
|||
|
PROTOTYPE: $
|
|||
|
PREINIT:
|
|||
|
unsigned char *str, *p, *e;
|
|||
|
STRLEN byte, len = 0;
|
|||
|
CODE:
|
|||
|
p = str = (unsigned char *)SvPV(arg, byte);
|
|||
|
e = str + byte;
|
|||
|
while (p < e) {
|
|||
|
if (0x81 <= *p && *p <= 0x9F || 0xE0 <= *p && *p <= 0xFC)
|
|||
|
++p;
|
|||
|
++p, ++len;
|
|||
|
}
|
|||
|
RETVAL = len;
|
|||
|
OUTPUT:
|
|||
|
RETVAL
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>P<EFBFBD>ʂɕ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
Shift-JIS<49><53><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><F095B68E>P<EFBFBD>ʂɕ<CA82><C995><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>傤<EFBFBD>B<EFBFBD><42><EFBFBD>̏ꍇ<CC8F>́AXS<58>𗘗p<F0979897><70><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>܂葬<DC82><E891AC><EFBFBD>Ȃ<EFBFBD><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>B<EFBFBD>Ԃ<EFBFBD><D482>l<EFBFBD>̃<EFBFBD><CC83>X<EFBFBD>g<EFBFBD><67><EFBFBD>p<EFBFBD>ӂ<EFBFBD><D382><EFBFBD><EFBFBD>̂Ɏ<CC82><C98E>Ԃ<EFBFBD><D482><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82>A<EFBFBD><41><EFBFBD>͂<EFBFBD>Perl<72>̐<EFBFBD><CC90>K<EFBFBD>\<5C><><EFBFBD>̏<EFBFBD><CC8F><EFBFBD><EFBFBD>͂<EFBFBD><CD82>Ȃ葬<C882><E891AC><EFBFBD><EFBFBD><EFBFBD>̂<EFBFBD><CC82>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃł<C682><C582>傤<EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
use Benchmark;
|
|||
|
|
|||
|
$char = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
$s = "<22><><EFBFBD>{<7B><><EFBFBD><EFBFBD>ݺ<EFBFBD>\0ABC" x 100;
|
|||
|
|
|||
|
timethese (1000, {
|
|||
|
re => q{
|
|||
|
@re = $s =~ /$char/go;
|
|||
|
},
|
|||
|
xs => q{
|
|||
|
@xs = sjsplit($s);
|
|||
|
},
|
|||
|
});
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
Benchmark: timing 1000 iterations of re, xs...
|
|||
|
re: 7 wallclock secs ( 6.65 usr + 0.00 sys = 6.65 CPU) @ 150.38/s
|
|||
|
xs: 6 wallclock secs ( 5.33 usr + 0.00 sys = 5.33 CPU) @ 187.62/s
|
|||
|
|
|||
|
XSUB
|
|||
|
void
|
|||
|
sjsplit(arg)
|
|||
|
SV* arg
|
|||
|
PROTOTYPE: $
|
|||
|
PREINIT:
|
|||
|
unsigned char *str, *p, *e;
|
|||
|
STRLEN ch, byte, len = 0;
|
|||
|
PPCODE:
|
|||
|
str = (unsigned char *)SvPV(arg,byte);
|
|||
|
e = str + byte;
|
|||
|
for (p = str; p < e; p++) {
|
|||
|
if (0x81 <= *p && *p <= 0x9F || 0xE0 <= *p && *p <= 0xFC) ++p;
|
|||
|
++len;
|
|||
|
}
|
|||
|
EXTEND(SP,len);
|
|||
|
for (p = str; p < e; p += ch) {
|
|||
|
ch = (0x81 <= *p && *p <= 0x9F || 0xE0 < *p && *p <= 0xFC) ? 2 : 1;
|
|||
|
PUSHs(sv_2mortal(newSVpv(p,ch)));
|
|||
|
}
|
|||
|
|
|||
|
<EFBFBD>F<EFBFBD>X<EFBFBD>ȕ<EFBFBD><EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ŕ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł݂<EFBFBD><EFBFBD>悤<EFBFBD>ɁA<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɂ́Am//g<><67><EFBFBD>֗<EFBFBD><D697>ł<EFBFBD><C582>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
$onebyte = '[\x00-\x7F\xA1-\xDF]';
|
|||
|
$twobyte = '(?:[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
$char = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
|
|||
|
#<23>P<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̉<EFBFBD><CC89>ƂQ<C682>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̉<EFBFBD><CC89>ɕ<EFBFBD><C995><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
while ($str =~ /\G($onebyte*)($twobyte*)/g) {
|
|||
|
push @one, $1 if $1 ne '';
|
|||
|
push @two, $2 if $2 ne '';
|
|||
|
}
|
|||
|
|
|||
|
#<23><><EFBFBD>_<EFBFBD><5F><EFBFBD>Ō<EFBFBD><C58C>̕<EFBFBD><CC95><EFBFBD><EFBFBD>ƂȂ<C682><C882>悤<EFBFBD>ɕ<EFBFBD><C995><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
# '<27>B' <20>ł͂<C582><CD82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>Ă͒<C482><CD92>ӂ<EFBFBD><D382>K<EFBFBD>v<EFBFBD>B
|
|||
|
@sentences = $str =~ /\G$char*?(?:<3A>B|<7C>D|$)/g;
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ő肻<EFBFBD>낦<EFBFBD><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><EFBFBD><EFBFBD>j<EFBFBD>Ő肻<EFBFBD>낦<EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD>A<EFBFBD><EFBFBD><EFBFBD>̂悤<EFBFBD>ɂ<EFBFBD><EFBFBD>Ăł<EFBFBD><EFBFBD>܂<EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
$char = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
|
|||
|
$str = '<27>킴<EFBFBD>킴EUC-JP<4A>ɕϊ<C995><CF8A><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>ŁAShift-JIS<49>̂܂<DC82><DC8F><EFBFBD>'.
|
|||
|
'<27>ł<EFBFBD><C582><EFBFBD><EFBFBD>炢<EFBFBD><E782A2><EFBFBD><EFBFBD><F182BE82>ǁA<C781>Ȃ<EFBFBD><C882>Ȃ<EFBFBD><C882>ʓ|<7C><><EFBFBD>˂<EFBFBD><CB82>B';
|
|||
|
|
|||
|
print join "\n", bytebreak($str,15);
|
|||
|
|
|||
|
sub bytebreak{
|
|||
|
my($byte,$bmax,$ch,@lines);
|
|||
|
my $str = shift;
|
|||
|
$byte = $bmax = shift;
|
|||
|
foreach $ch ($str =~ /$char/go) {
|
|||
|
$byte += length $ch; # <20><><EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>p<EFBFBD><70><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
if ($byte <= $bmax) {
|
|||
|
$lines[-1] .= $ch; # <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Όp<CE8C><70><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
} else {
|
|||
|
$byte = length $ch;
|
|||
|
push @lines, $ch; # <20><><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ύ<EFBFBD><CE8E>̍s<CC8D><73>
|
|||
|
}
|
|||
|
}
|
|||
|
return @lines;
|
|||
|
# <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>ꍇ<EFBFBD>ɁA<C981>E<EFBFBD><45><EFBFBD>X<EFBFBD>y<EFBFBD>[<5B>X<EFBFBD>Ŗ<EFBFBD><C596>߂<EFBFBD><DF82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
# return map {$_ .= ' ' x ($bmax - length)} @lines;
|
|||
|
}
|
|||
|
|
|||
|
<EFBFBD>֑<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A<EFBFBD>Ⴆ<EFBFBD>Ύ<EFBFBD><EFBFBD>̂悤<EFBFBD>ɂ<EFBFBD><EFBFBD>čs<EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><EFBFBD>B<EFBFBD>P<EFBFBD><EFBFBD><EFBFBD>ȍl<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł́A<EFBFBD>֑<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A(i) <20>s<EFBFBD><73><EFBFBD>֑<EFBFBD><D691><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><CC92>O<EFBFBD>ʼn<EFBFBD><C589>s<EFBFBD><73><EFBFBD>Ȃ<EFBFBD><C882>G(ii) <20>s<EFBFBD><73><EFBFBD>֑<EFBFBD><D691><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><CC92><EFBFBD><EFBFBD>ʼn<EFBFBD><C589>s<EFBFBD><73><EFBFBD>Ȃ<EFBFBD><C882>G<EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƂɂȂ<C982><C882>܂<EFBFBD><DC82>B<EFBFBD>܂<EFBFBD><DC82>A"(a)"<22>̂悤<CC82>ɁA<C981>s<EFBFBD><73><EFBFBD>֑<EFBFBD><D691><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƍs<C68D><73><EFBFBD>֑<EFBFBD><D691><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̊ԂɂP<C982><50><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>́A<CD81><41><EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD>̑S<CC91>̂<EFBFBD><CC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD>ɂȂ<C982><C882>_<EFBFBD>ɂ<EFBFBD><C982>z<EFBFBD><7A><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>̗<EFBFBD><EFBFBD>ł͕<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̒<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><EFBFBD> length <20>ŋK<C58B>肵<EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƃo<C683>C<EFBFBD>g<EFBFBD><67><EFBFBD>͕K<CD95><4B><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ⴕ<EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>̂ŁA<C581>ꍇ<EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>Ắi<CD81>M<EFBFBD><4D><EFBFBD>V<EFBFBD>A<EFBFBD><41><EFBFBD><EFBFBD><EFBFBD>͔<EFBFBD><CD94>p<EFBFBD><70><EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>A<EFBFBD>܂<EFBFBD><DC82>̓v<CD83><76><EFBFBD>|<7C>[<5B>V<EFBFBD><56><EFBFBD>i<EFBFBD><69><EFBFBD>̏ꍇ<CC8F>Ƃ<EFBFBD><C682>AUTF-8<>̏ꍇ<CC8F>Ƃ<EFBFBD><C682>j<EFBFBD><6A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ԃ<EFBFBD> width <20>̂悤<CC82>Ȋ<C88A><D690><EFBFBD><EFBFBD><EFBFBD><EFBFBD>`<60><><EFBFBD><EFBFBD><EFBFBD>K<EFBFBD>v<EFBFBD><76><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582>傤<EFBFBD>B
|
|||
|
<EFBFBD>܂<EFBFBD><EFBFBD>A<EFBFBD><EFBFBD><EFBFBD>̗<EFBFBD><EFBFBD>̂<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł́A<EFBFBD>֑<EFBFBD><EFBFBD>ɂ<EFBFBD><EFBFBD>閳<EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ň<EFBFBD><EFBFBD>s<EFBFBD><EFBFBD><EFBFBD>蒷<EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD>ꍇ<EFBFBD>́A<EFBFBD>݂͂<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>h<EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><EFBFBD><EFBFBD><EFBFBD>B<EFBFBD><EFBFBD><EFBFBD>ꂪ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD>A<EFBFBD>֑<EFBFBD><EFBFBD>̗<EFBFBD><EFBFBD>O<EFBFBD>Ƃ<EFBFBD><EFBFBD>čs<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>Ⴆ<EFBFBD><EFBFBD>$next<78>̒<EFBFBD><CC92><EFBFBD><EFBFBD><EFBFBD>$bmax<61><EFBFBD><F092B482>Ȃ<EFBFBD><C882>悤<EFBFBD>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>j<EFBFBD><6A><EFBFBD>u<EFBFBD><75><EFBFBD>K<EFBFBD>v<EFBFBD>ł<EFBFBD><C582>傤<EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
$CharRE = '(?:[\x00-\x7F\xA1-\xDF]|[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])';
|
|||
|
|
|||
|
# <20>s<EFBFBD><73><EFBFBD>֑<EFBFBD><D691><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>ꕔ<EFBFBD><EA9594><EFBFBD>j
|
|||
|
$NotAtBegin = q/)]}<7D>f<EFBFBD>h<EFBFBD>v<EFBFBD>x<EFBFBD>j<EFBFBD>n<EFBFBD>p!,.:;?<3F>A<EFBFBD>B<EFBFBD>X<EFBFBD>J<EFBFBD>K<EFBFBD>I<EFBFBD>C<EFBFBD>D<EFBFBD>F<EFBFBD>G<EFBFBD>H/;
|
|||
|
# <20>s<EFBFBD><73><EFBFBD>֑<EFBFBD><D691><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD>ꕔ<EFBFBD><EA9594><EFBFBD>j
|
|||
|
$NotAtEnd = q/([{<7B>e<EFBFBD>g<EFBFBD>u<EFBFBD>w<EFBFBD>i<EFBFBD>m<EFBFBD>o/;
|
|||
|
|
|||
|
# <20>n<EFBFBD>b<EFBFBD>V<EFBFBD><56><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
@NotAtBegin{$NotAtBegin =~ m/$CharRE/g} = ();
|
|||
|
@NotAtEnd{ $NotAtEnd =~ m/$CharRE/g} = ();
|
|||
|
|
|||
|
$Str = '<27>킴<EFBFBD>킴EUC-JP<4A>ɕϊ<C995><CF8A><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882>ŁAShift-JIS<49>̂܂<DC82><DC8F><EFBFBD>'.
|
|||
|
'<27>ł<EFBFBD><C582><EFBFBD><EFBFBD>炢<EFBFBD><E782A2><EFBFBD><EFBFBD><F182BE82>ǁA<C781>Ȃ<EFBFBD><C882>Ȃ<EFBFBD><C882>ʓ|<7C><><EFBFBD>˂<EFBFBD><CB82>B';
|
|||
|
|
|||
|
print join "\n", linebreak($Str,16);
|
|||
|
|
|||
|
sub linebreak{
|
|||
|
my($byte,$i,@chars,$next,@lines);
|
|||
|
my($str, $bmax, $pad) = @_;
|
|||
|
|
|||
|
# $byte<74>͎<EFBFBD><CD8E>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>p<EFBFBD><70><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>̒<EFBFBD><CC92><EFBFBD>
|
|||
|
$byte = $bmax; # <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD>ł<EFBFBD><C582>邽<EFBFBD>߂̏<DF82><CC8F><EFBFBD><EFBFBD>l<EFBFBD>B
|
|||
|
|
|||
|
# <20><><EFBFBD><EFBFBD><EFBFBD>P<EFBFBD>ʂɂ炷
|
|||
|
@chars = $str =~ /$CharRE/go;
|
|||
|
|
|||
|
for ($i=0; $i<@chars; $i++) {
|
|||
|
$next .= $chars[$i]; # <20><><EFBFBD>̕<EFBFBD><CC95><EFBFBD>
|
|||
|
$byte += length $chars[$i]; # <20><><EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>p<EFBFBD><70><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
# <20><><EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD>֑<EFBFBD><D691>̂Ƃ<CC82>
|
|||
|
next if $i+1 < @chars && exists $NotAtEnd{ $chars[$i] };
|
|||
|
# <20><><EFBFBD>̕<EFBFBD><CC95><EFBFBD><EFBFBD>̎<EFBFBD><CC8E><EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD>֑<EFBFBD><D691>̂Ƃ<CC82>
|
|||
|
next if $i+1 < @chars && exists $NotAtBegin{ $chars[$i+1] };
|
|||
|
|
|||
|
# <20>s<EFBFBD>̐U<CC90>蕪<EFBFBD><E895AA>
|
|||
|
# <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Όp<CE8C><70><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
if ($byte <= $bmax) {
|
|||
|
$lines[-1] .= $next;
|
|||
|
}
|
|||
|
# <20><><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ύ<EFBFBD><CE8E>̍s<CC8D><73>
|
|||
|
else {
|
|||
|
push @lines, $next;
|
|||
|
$byte = length $next;# <20>V<EFBFBD><56><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD>̒<EFBFBD><CC92><EFBFBD>
|
|||
|
}
|
|||
|
$next = '';
|
|||
|
}
|
|||
|
return defined $pad && 1 == length $pad # <20>l<EFBFBD>ߕ<EFBFBD>
|
|||
|
? map {$_ .= $pad x ($bmax - length)} @lines
|
|||
|
: @lines;
|
|||
|
}
|
|||
|
|
|||
|
<EFBFBD>Ԃ牺<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>֑<EFBFBD><EFBFBD>̏ꍇ<EFBFBD>i$bmin <20><><EFBFBD><EFBFBD> $bmax<61>͈̔͂<CD88><CD82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>j<EFBFBD>B
|
|||
|
$bmin = $bmax - 2; # <20>Ⴆ<EFBFBD>B
|
|||
|
|
|||
|
# <20>s<EFBFBD>̐U<CC90>蕪<EFBFBD><E895AA>
|
|||
|
# <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Όp<CE8C><70><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
if ($byte <= $bmax && @lines && length $lines[-1] < $bmin){
|
|||
|
$lines[-1] .= $next;
|
|||
|
}
|
|||
|
# <20><><EFBFBD><EFBFBD><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ύ<EFBFBD><CE8E>̍s<CC8D><73>
|
|||
|
else {
|
|||
|
push @lines, $next;
|
|||
|
$byte = length $next;# <20>V<EFBFBD><56><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD>̒<EFBFBD><CC92><EFBFBD>
|
|||
|
}
|
|||
|
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>{<7B>ꕶ<EFBFBD><EA95B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ёւ<D191><D682><EFBFBD>
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD>Ƀ\<5C>[<5B>g<EFBFBD><67><EFBFBD>郂<EFBFBD>W<EFBFBD><57><EFBFBD>[<5B><><EFBFBD>Ƃ<EFBFBD><C682>āAShiftJIS/Collate.pm <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>Ǝg<C68E><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Perl<72>̃y<CC83>[<5B>W<EFBFBD>ɖ߂<C996><DF82>Ό<EFBFBD><CE8C><EFBFBD><C282><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>u<EFBFBD>ǂ݁E<EFBFBD>\<5C>L<EFBFBD>ƍ<EFBFBD><C68D>v<EFBFBD>͎<EFBFBD><CD8E>̂悤<CC82>ɂ<EFBFBD><C982>čs<C48D><73><EFBFBD>܂<EFBFBD><DC82>BsortYomi<6D><69><EFBFBD>\<5C>b<EFBFBD>h<EFBFBD>̎<CC8E><F382AF8E>郊<EFBFBD>X<EFBFBD>g<EFBFBD>̊e<CC8A>v<EFBFBD>f<EFBFBD>́A[ <20>\<5C>L<EFBFBD><4C>, <20>ǂݗ<C782> ]<5D>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>z<EFBFBD>t<F1838A83>@<40><><EFBFBD><EFBFBD><EFBFBD>X<EFBFBD>łȂ<C582><C882><EFBFBD><EFBFBD>Ȃ<CE82><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
use ShiftJIS::Collate;
|
|||
|
|
|||
|
my @data = (
|
|||
|
[qw/ <20><><EFBFBD>R <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20><><EFBFBD>c <20>Ȃ<EFBFBD><C882><EFBFBD> /],
|
|||
|
[qw/ <20>c<EFBFBD><63> <20><><EFBFBD>Ȃ<EFBFBD> /],
|
|||
|
[qw/ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20><><EFBFBD>R <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20>R<EFBFBD>c <20><><EFBFBD>܂<EFBFBD> /],
|
|||
|
[qw/ <20>i<EFBFBD>c <20>Ȃ<EFBFBD><C882><EFBFBD> /],
|
|||
|
);
|
|||
|
|
|||
|
@sort = ShiftJIS::Collate->new()->sortYomi(@data);
|
|||
|
|
|||
|
<EFBFBD>u<EFBFBD>ȈՑ<EFBFBD><EFBFBD>\<5C>ǂݏƍ<DD8F><C68D>v<EFBFBD>͎<EFBFBD><CD8E>̂悤<CC82>ɂ<EFBFBD><C982>čs<C48D><73><EFBFBD>܂<EFBFBD><DC82>BsortDaihyo<79><6F><EFBFBD>\<5C>b<EFBFBD>h<EFBFBD>̎<CC8E><F382AF8E>郊<EFBFBD>X<EFBFBD>g<EFBFBD>̊e<CC8A>v<EFBFBD>f<EFBFBD>́A[ <20>\<5C>L<EFBFBD><4C>, <20>ǂݗ<C782> ]<5D>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD>z<EFBFBD>t<F1838A83>@<40><><EFBFBD><EFBFBD><EFBFBD>X<EFBFBD>łȂ<C582><C882><EFBFBD><EFBFBD>Ȃ<CE82><C882>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>T<EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><EFBFBD><EFBFBD>R<EFBFBD>[<5B>h
|
|||
|
|
|||
|
#!perl
|
|||
|
use ShiftJIS::Collate;
|
|||
|
|
|||
|
my @data = (
|
|||
|
[qw/ <20>Ɍv<C98C>Z <20><><EFBFBD>ނ<EFBFBD><DE82><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ JIS<49>ԍ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><CE82> /],
|
|||
|
[qw/ <20><><EFBFBD>B <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ǂ<EFBFBD> /],
|
|||
|
[qw/ <20>͐<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20>͓<EFBFBD> <20><><EFBFBD>킿 /],
|
|||
|
[qw/ <20>p<EFBFBD>c <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20>p<EFBFBD>c <20><><EFBFBD>ǂ<EFBFBD> /],
|
|||
|
[qw/ <20>@<40><> <20><><EFBFBD><EFBFBD><EFBFBD>炬 /],
|
|||
|
[qw/ <20>͓<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20>K<EFBFBD>R <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20>K<EFBFBD>R <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> /],
|
|||
|
[qw/ <20><><EFBFBD><EFBFBD> <20><><EFBFBD>Ƃ<EFBFBD> /],
|
|||
|
[qw/ <20><><EFBFBD>a<EFBFBD>c <20><><EFBFBD>킾 /],
|
|||
|
[qw/ <20><><EFBFBD><EFBFBD> <20><><EFBFBD>킵<EFBFBD><ED82B5> /],
|
|||
|
[qw/ <20><><EFBFBD>c <20><><EFBFBD>킾 /],
|
|||
|
[qw/ <20>V<EFBFBD>c <20><><EFBFBD>킾 /],
|
|||
|
[qw/ <20>p<EFBFBD>c <20>̂<C282> /],
|
|||
|
[qw/ <20>ƈ<EFBFBD> <20><EFBFBD><C282><EFBFBD> /],
|
|||
|
[qw/ <20>y<EFBFBD><79> <20><EFBFBD><C282><EFBFBD> /],
|
|||
|
[qw/ <20>y<EFBFBD><79> <20><EFBFBD><C282><EFBFBD> /],
|
|||
|
[qw/ <20>ˈ<EFBFBD> <20>Ƃ<EFBFBD> /],
|
|||
|
[qw/ <20>˓c <20>Ƃ<EFBFBD> /],
|
|||
|
[qw/ <20>y<EFBFBD><79> <20>ǂ<EFBFBD> /],
|
|||
|
[qw/ <20>y<EFBFBD><79> <20>ǂ<EFBFBD> /],
|
|||
|
[qw/ <20>y<EFBFBD><79> <20>Ƃ<EFBFBD> /],
|
|||
|
[qw/ <20><><EFBFBD>c <20>₷<EFBFBD><E282B7> /],
|
|||
|
);
|
|||
|
|
|||
|
@sort = ShiftJIS::Collate->new()->sortDaihyo(@data);
|
|||
|
|
|||
|
|
|||
|
Shift-JIS<49>̊<EFBFBD><CC8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂ރt<DE83>@<40>C<EFBFBD><43><EFBFBD><EFBFBD>/<2F>p<EFBFBD>X<EFBFBD><58>
|
|||
|
<EFBFBD>{<7B><><EFBFBD>ڂ́A<CD81><41><EFBFBD>̍<EFBFBD><CC8D>ڂɑ<DA82><C991><EFBFBD><EFBFBD>āA<C481><41><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD>[<5B><><EFBFBD>̂܂܋L<DC8B>q<EFBFBD><71><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>̂ŁA<C581><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Q<EFBFBD>l<EFBFBD>ɂ<EFBFBD><C982>悤<EFBFBD>Ǝv<C68E><76><EFBFBD><EFBFBD><EFBFBD>ꍇ<EFBFBD>A<EFBFBD>\<5C><><EFBFBD>ɒ<EFBFBD><C992>ӂ̏<D382><CC8F>A<EFBFBD>[<5B><><EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>܂ł<DC82><C582><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̍<EFBFBD><CC8D>Ɗ<C68A><C28B>Ńe<C583>X<EFBFBD>g<EFBFBD><67><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
Windows (95/98/NT/2000<30>Ȃ<EFBFBD>) <20>ŁA<C581>t<EFBFBD>@<40>C<EFBFBD><43><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>p<EFBFBD>X<EFBFBD><58><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD>ł͓<C582><CD93>o<EFBFBD>C<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>̈Ӗ<CC88><D396>Ŏg<C58E><67><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD><DC82>̂ŁA<C581><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>L<EFBFBD><4C><EFBFBD>Ȃǂ<C882><C782>܂݂܂<DD82><DC82>B<EFBFBD>j<EFBFBD><6A><EFBFBD>܂ޏꍇ<DE8F>APerl<72>ň<EFBFBD><C588><EFBFBD><EFBFBD>ۂɖ<DB82><C996>肪<EFBFBD><E882AA><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<5C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>o<EFBFBD>C<EFBFBD>g<EFBFBD><EFBFBD> "\x5C" <20>̊<EFBFBD><CC8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>t<C283>@<40>C<EFBFBD><43><EFBFBD><EFBFBD>/<2F>p<EFBFBD>X<EFBFBD><58>
|
|||
|
<EFBFBD>f<EFBFBD>B<EFBFBD><EFBFBD><EFBFBD>N<EFBFBD>g<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>imkdir, rmdir, opendir, -d <20>Ȃǁj<C781>A<EFBFBD>t<EFBFBD>@<40>C<EFBFBD><43><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><D690>iopen, unlink, -f <20>Ȃǁj<C781>ŁA<C581>A<EFBFBD>N<EFBFBD>Z<EFBFBD>X<EFBFBD>ł<EFBFBD><C582>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD>t<EFBFBD>@<40>C<EFBFBD><43><EFBFBD>̏ꍇ<CC8F>́A<CD81><41><EFBFBD><EFBFBD><EFBFBD>ɔ<EFBFBD><C994>p<EFBFBD>X<EFBFBD>y<EFBFBD>[<5B>X<EFBFBD><58><EFBFBD>Y<EFBFBD><59><EFBFBD><EFBFBD><EFBFBD>ƃA<C683>N<EFBFBD>Z<EFBFBD>X<EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>ꍇ<EFBFBD><EA8D87><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>i<EFBFBD>Ⴆ<EFBFBD>A-f '<27>\ ' <20>܂<EFBFBD><DC82><EFBFBD> -f "\x95\x5C\x20" <20>Ȃǁj<C781>B
|
|||
|
<EFBFBD>f<EFBFBD>B<EFBFBD><EFBFBD><EFBFBD>N<EFBFBD>g<EFBFBD><EFBFBD><EFBFBD>̏ꍇ<EFBFBD>́A<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> / <20><> \ <20><><EFBFBD>Y<EFBFBD><59><EFBFBD><EFBFBD><EFBFBD>ƃA<C683>N<EFBFBD>Z<EFBFBD>X<EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>ꍇ<EFBFBD><EA8D87><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>i<EFBFBD>Ⴆ<EFBFBD>A-d '<27>\/' <20>܂<EFBFBD><DC82><EFBFBD> -d "\x95\x5C/" <20>Ȃǁj<C781>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD>ɓY<C993><59><EFBFBD>镶<EFBFBD><E995B6><EFBFBD>p<F094BC8A>X<EFBFBD>y<EFBFBD>[<5B>X<EFBFBD>Ƃ<EFBFBD><C682>Ă<EFBFBD><C482>A<EFBFBD><41><EFBFBD>܂<EFBFBD><DC82>A<EFBFBD>N<EFBFBD>Z<EFBFBD>X<EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>ꍇ<EFBFBD><EA8D87><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>B<EFBFBD>Y<EFBFBD><59><EFBFBD>镶<EFBFBD><E995B6><EFBFBD>̌<EFBFBD><CC8C><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>āA<C481>O<EFBFBD><4F><EFBFBD>ނ̕<DE82><CC95><EFBFBD><EFBFBD>i<EFBFBD>X<EFBFBD><58><EFBFBD>b<EFBFBD>V<EFBFBD><56><EFBFBD>A<EFBFBD>~<7E>L<EFBFBD><4C><EFBFBD>A<EFBFBD>j<F3949281><6A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>ǂ̕<C782><CC95><EFBFBD><EFBFBD><EFBFBD><EFBFBD>悢<EFBFBD><E682A2><EFBFBD>́A<CD81><EFBFBD><D690>ɂ<EFBFBD><C982><EFBFBD><EFBFBD>ĈقȂ<D982><C882>ꍇ<EFBFBD><EA8D87><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>悤<EFBFBD>ł<EFBFBD><C582>B<EFBFBD>g<EFBFBD>p<EFBFBD><70><EFBFBD><EFBFBD><EFBFBD>O<EFBFBD>ɏ\<5C><><EFBFBD>Ƀe<C983>X<EFBFBD>g<EFBFBD><67><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B
|
|||
|
<EFBFBD>Ȃ<EFBFBD><EFBFBD>A<EFBFBD>f<EFBFBD>B<EFBFBD><EFBFBD><EFBFBD>N<EFBFBD>g<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̖<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> / <20><> \ <20><><EFBFBD>Y<EFBFBD><59><EFBFBD><EFBFBD><EFBFBD>ꍇ<EFBFBD>A<EFBFBD><41><EFBFBD>Ƃ<EFBFBD><C682>Ɩ<EFBFBD><C696><EFBFBD><EFBFBD><EFBFBD> / <20><> \ <20><><EFBFBD>t<EFBFBD><74><EFBFBD>Ă<EFBFBD><C482><EFBFBD><EFBFBD>ꍇ<EFBFBD>ɂ́A<CD81><41><EFBFBD>d<EFBFBD>ɕt<C995><74><EFBFBD><EFBFBD><EFBFBD>Ƃ<EFBFBD><C682>܂<EFBFBD><DC82>s<EFBFBD><73><EFBFBD>Ȃ<EFBFBD><C882><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ꂪ<EFBFBD><EA82AA><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82>̂ŁA<C581><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><41><EFBFBD>̑O<CC91>Ɍ<EFBFBD><C98C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ق<EFBFBD><D982><EFBFBD><EFBFBD>悢<EFBFBD>ł<EFBFBD><C582>傤<EFBFBD>B
|
|||
|
<EFBFBD>ǂ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ă<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><EFBFBD><EFBFBD>ŐM<EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><EFBFBD>Ȃ<EFBFBD><EFBFBD>ꍇ<EFBFBD>́A`` <20>܂<EFBFBD><DC82><EFBFBD> qx// <20><> system()<29><EFBFBD><D690>Ȃǂ<C882><C782>ʂ<EFBFBD><CA82><EFBFBD>Windows<77>̃R<CC83>}<7D><><EFBFBD>h<EFBFBD><68><EFBFBD>ĂԂ̂<D482><CC82>ǂ<EFBFBD><C782>Ǝv<C68E><76><EFBFBD>܂<EFBFBD><DC82>B
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD>
|
|||
|
Shift-JIS <20>ŏ<EFBFBD><C58F><EFBFBD><EFBFBD>ꂽ POD <20><> Perl 5.8.1, 5.8.2 <20><> Pod::Html <20><> HTML <20>ɕϊ<C995><CF8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ꍇ<EFBFBD>A<EFBFBD>A<EFBFBD><41><EFBFBD>J<EFBFBD>[<5B>̖<EFBFBD><CC96>O<EFBFBD>́A <20>p<EFBFBD><70><EFBFBD><EFBFBD><EFBFBD>Ɖ<EFBFBD><C689><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> [0xA6..0xDF] <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A <20><><EFBFBD>̊e<CC8A>o<EFBFBD>C<EFBFBD>g<EFBFBD>͉<EFBFBD><CD89><EFBFBD><EFBFBD>i'_'<27>j<EFBFBD>ɕϊ<C995><CF8A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>悤<EFBFBD>ł<EFBFBD><C582>B <20><><EFBFBD>̓I<CC93>ɂ́Ause locale; <20><><EFBFBD>ŁAlc <20><> s/\W/_/g <20><><EFBFBD><EFBFBD><EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (cf. Pod::Html::anchorify) <20>ɂȂ<C982><C882>܂<EFBFBD><DC82>B
|
|||
|
[2003-11-18]
|
|||
|
Perl<EFBFBD>̃y<EFBFBD>[<5B>W
|