CGIに依存しないPerlの話題一般/Part2 (258レス)
CGIに依存しないPerlの話題一般/Part2 http://medaka.5ch.net/test/read.cgi/php/1030548610/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
レス栞
リロード規制
です。10分ほどで解除するので、
他のブラウザ
へ避難してください。
181: 4 [] 03/03/31 16:29 ID:i9DdbQyy >>177 12とでるのは、print '1';print '2'だから、12と思う。 ここは分かってるよね? $a = 'あ'; print '1' if $a eq 'あ'; print '2' if $a =~ /\Qあ\E/; というのはどうだろうか? しかし、EUCなら/あ/で通ると思うが.. $a = 'あ'; print '1' if $a eq "\xa4\xa2"; print '2' if $a =~ /\xa4\xa2/; で、12とでる? http://medaka.5ch.net/test/read.cgi/php/1030548610/181
184: nobodyさん [] 03/04/04 00:08 ID:tjlK2qT8 >>181 #!/bin/perl use encoding 'euc-jp'; $a = 'あ'; print '1' if $a eq 'あ'; print '2' if $a =~ /\Qあ\E/; print '3' if $a =~ /\xa4\xa2/; からは1が出力され, #!/bin/perl $a = 'あ'; print '1' if $a eq 'あ'; print '2' if $a =~ /\Qあ\E/; print '3' if $a =~ /\xa4\xa2/; からは123が出力されます。 いまいちEncode.pmがわからないです。 http://medaka.5ch.net/test/read.cgi/php/1030548610/184
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.012s