- # 啟動 big5 字串解析; 標準輸出入及標準錯誤都設為 big5 編碼
- use encoding 'big5', STDIN => 'big5', STDOUT => 'big5';
- print length("駱駝"); # 2 (雙引號表示字符)
- print length('駱駝'); # 4 (單引號表示位元組)
- print index("諄諄教誨", "彖帢"); # -1 (不包含此子字串)
- print index('諄諄教誨', '彖帢'); # 1 (從第二個位元組開始)
+ use utf8;
+ print length("駱駝"); # 2 (不是 6)
+ print index("諄諄教誨", "教誨"); # 2 (從 0 起算第 2 個字符)