スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

[Perl]UTF-8で指定文字バイトでカットする

とある事情で、PerlのCGIをサーバーにセッティングすることになりました。
PHPと同じく、文字化けに悩まされてます。

しかも、「Perlっておいしい?」レベルの私が対応するんだから、
もう、大変です。

もともとのスクリプトは、Shift-JISもしくはEUCでは対応しているのですが
今回、設定するのはUTF-8。
文字列の変換は、ファイルをUTF-8で保存しただけで何だかうまくいったけど(大丈夫かよ)。
問題になったのは、substr();

UTF-8に変更したためか、うまくカットしてくれなくて
文字列の最後尾に変な文字コードが追加されてしまう・・・

use utf8;



が使えるとsubstr()も、問題なく使えるらしいのですが
1からつくったのなら、ともかく(作れないけど)、
そこまで改造して作りかえるほど、知識はありませせん。

ということで、参考にさせていただいたサイトです。

りんけーじ - 開発資料 - サーバ - Perl で UTF-8 文字列をバイト数でカットする

これから自作で作られる方は、必要ないと思いますが、
既存のCGIを改造して使用しなくちゃいけない場合は、ぜひ。

あぁ。Perlにもmb_strimwidth()が欲しいものです。

コメントの投稿

非公開コメント

なんか全然わからない言語なんだけど
すごいってことだけはわかるよ(笑)
ときどきぷろぐらまさん、すごーい。

文字数カット

プログラマとして
文字数カットとの
葛藤は、いつまでたっても
終わりませんね。。。

管理人のみ閲覧できます

このコメントは管理人のみ閲覧できます
スポンサードリンク
枚方情報
最新記事
カテゴリ
人気ページランキング
ブログパーツ
検索フォーム
最新コメント
楽天オススメ
人気検索記事
プロフィール

ときどきぷろぐらま。

miichan1016をフォローしましょう

Author:ときどきぷろぐらま。
ママぷろぐらま、として頑張ってます。
好きなことはPHPでプログラムを組むこと。
ブログランキング・にほんブログ村へ

メールフォーム

名前:
メール:
件名:
本文:

お気に入りリンク
相互リンク 新着記事
相互リンクをしていただくと、こちらにあなたの最新のブログ記事が表示されます。
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。