CGIに依存しないPerlの話題一般/Part2 (258ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

1(2): nobodyさん [] 02/08/29 00:30 ID:IO82UwTT(1)
そんなスレ

---

7(1): 1 [sage] 02/08/29 15:46 ID:???
前スレがどう終わったのか知らんのだが、、

---

177(2): nobodyさん [] 03/03/30 18:00 ID:Okt0zbYe(1)
Perl 5.8なんですが，

use encoding 'euc-jp';

$a = 'あ';
print '1' if $a eq 'あ';
print '2' if $a =~ /あ/;

だと「1」が出力されます。

use encoding 'euc-jp', Filter=>1;

$a = 'あ';
print '1' if $a eq 'あ';
print '2' if $a =~ /あ/;

だと「12」が出力されます。

どうしてでしょう？　スクリプトはEUCで書いてます。

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.016s