CGIに依存しないPerlの話題一般/Part2 (258レス)
上下前次1-新
抽出解除 レス栞
184(2): 03/04/04 00:08 ID:tjlK2qT8(1/2) AAS
>>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/;
省8
185(2): 03/04/04 00:28 ID:??? AAS
>>184件のスクリプトをテストしてみたが
スクリプトの漢字コードeucで保存してる?
スクリプトの漢字コードが
Jisなら1だけ
Shift-Jisなら1,2
EUC-JPなら1,2,3
が出力されておるのだが・・・
省2
189(1): 184 03/04/04 02:39 ID:tjlK2qT8(2/2) AAS
>>185
下のスクリプトから123が出てくるのは期待通りなんですが,
上から1しかでてこないのが理解不能なんです。
use encodingの使い方間違ってる?
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.566s*