CGIに依存しないPerlの話題一般/Part2 (258レス)
1-

181
(1): 4 03/03/31 16:29 ID:i9DdbQyy(1) AAS
>>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とでる?
1-
あと 77 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.003s