[文字エンコード]の検索結果

＋ 

A [gcc]iconvで文字エンコードを変換するサンプルプログラム

－ 

A [gcc]iconvで文字エンコードを変換するサンプルプログラム

単にテキストファイル等の文字エンコードを変換するのであれば、iconvコマンドを使用して変換すれば良いのですが、ときにはプログラム内部で取得した文字列の文字エンコードを変換したい場合もあります。以下のプログ...

単にテキストファイル等の文字エンコードを変換するのであれば、iconvコマンドを使用して変換すれば良いのですが、 ときにはプログラム内部で取得した文字列の文字エンコードを変換したい場合もあります。

以下のプログラムはLinuxやCygwinの環境でC言語のプログラムからiconvを呼び出して文字エンコードを変換する場合の手順を示したサンプルプログラムです。

--- tst_iconv.c ---

#include <stdio.h>
#include <iconv.h>

#define  BUFSIZE  1024

char outbuf[BUFSIZE];

int convert(char const *src,
            char const *dest,
            char const *text,
            char *buf,
            size_t bufsize);

main(void)
{
    int ret;

    ret = convert("SHIFT-JIS", "UTF-8",
                  "日本語テストメッセージおはよう",
                  outbuf, sizeof(outbuf));
    if (ret) {
        printf("%s\n", outbuf);
    }
    else {
        printf("Oops!\n");
    }
}

int convert(char const *src,
            char const *dest,
            char const *text,
            char *buf,
            size_t bufsize)
{
    iconv_t cd;
    size_t srclen, destlen;
    size_t ret;

    cd = iconv_open(dest, src);
    if (cd == (iconv_t)-1) {
        perror("iconv open");
        return 0;
    }

    srclen = strlen(text);
    destlen = bufsize - 1;
    memset(buf, '\0', bufsize);

    ret = iconv(cd, &text, &srclen, &buf, &destlen);
    if (ret == -1) {
        perror("iconv");
        return 0;
    }

    iconv_close(cd);
    return 1;
}

コンパイル方法
$ gcc -o tst_iconv tst_iconv.c -liconv

ICONV

ふつうのLinuxプログラミング Linuxの仕組みから学べるgccプログラミングの王道
ソフトバンククリエイティブ 著者：青木 峰郎 価格：2,940円 評価：★★★★★

• 良書だと思います ★★★★★
• Linuxを学ぶ為の読本、Cプログラムミングを学ぶなら別の本で ★★★★★
• 基礎を学ぶには良い書籍だと思います ★★★★★
• 入門書としては良い ★★★★
• Linuxプログラミングを始めたい人にオススメ ★★★★★

powered by amalink

[2182] Posted by kagahiro at 2010/08/06 00:29:29
0 point | Link (1) | Trackback (0) | Comment (0)

＋ 

A URLを元にページのタイトルを取得するPerlサンプルスクリプト

－ 

A URLを元にページのタイトルを取得するPerlサンプルスクリプト

URLから元ページのタイトルを取得するためのPerlのサンプルスクリプトです。処理手順は以下の通りです。1.ページURLを元にHTMLソースを取得する。2.タイトルタグで囲まれている文字列を抜き出す。対象のページがどん...

URLから元ページのタイトルを取得するためのPerlのサンプルスクリプトです。
処理手順は以下の通りです。

1.ページURLを元にHTMLソースを取得する。
2.タイトルタグで囲まれている文字列を抜き出す。

対象のページがどんな文字エンコードで記述されているか不明なので、文字エンコードの変換処理も行っています。

use LWP::Simple;

use Jcode;



#my $pageurl = "http://www.01club.org/59log/";

my $pageurl = "http://59bbs.org/";

my $content = get($pageurl);

my $title = '';

my $pattern = "<title>(.+)</title>";

if($content =~ m/$pattern/i) {

    $title = $1;

}



# 文字コードをSJISに変換

my ($code, $nmatch) = Jcode::getcode(\$title); 

$title = Jcode->new($title, $code)->sjis;

print "$title\n";

サンプルコードではタイトルだけ取得してますが、正規表現のパターンを変更することで、本文も取得なども行えるはずです。

[231] Posted by buzei at 2008/03/02 22:35:06
0 point | Link (1) | Trackback (0) | Comment (0)

＋ 

A テキスト中のキーワードをリンクするPerlサンプルスクリプト

－ 

A テキスト中のキーワードをリンクするPerlサンプルスクリプト

任意のキーワードリストに含まれるテキスト中のキーワードに、特定のページ(URL)にリンクするPerlのサンプルスクリプトを作ってみました。ブログソフトとか掲示板ソフトを開発する際に役に立つと思います。文字エンコ...

任意のキーワードリストに含まれるテキスト中のキーワードに、特定のページ(URL)にリンクするPerlのサンプルスクリプトを作ってみました。ブログソフトとか掲示板ソフトを開発する際に役に立つと思います。文字エンコードがUTF-8、EUCではOKでしたが、SJISではうまく動きませんでした。

以下、サンプルスクリプトの一部です。

my @wordlist = ('はてな', 'ブログ', 'アルファブロガー');

foreach my $word (@wordlist) {

    my $encword = $word;

    $encword =~ s/(\W)/'%'.unpack('H2', $1)/eg;	# uri encode

    my $link = "<a href=\"serach.cgi?querystr=$encword\">$word</a>";

    $text =~ s/$word/$link/g;

    # アンカーテキストのキーワードは元に戻す

    my $pattern = "(<a href.+)<a href.+$word</a>(.+/a>)";

    $text =~ s/$pattern/$1$word$2/g;

}

print $text;

リンクの処理のところが微妙ですが、適当に修正して使っていただければ幸いです。

はてなダイアリーのキーワードにリンクするためのサンプルもあるようです。動かしてみたわけでないのでハッキリとはいえませんが、ソースを見る限りテキスト内でアンカータグでリンクを行っている場合は、まずいような気もします。

はてなダイアリーキーワード自動リンクAPI - はてなダイアリー日記

なお、上記ファイルは現状で300KBほどありますので、アプリケーション側で一定時間キャッシュして頂くなどの措置をお願いできればと思います。

テキスト一つ処理するだけで300KBですか、はてな側も大変かも知れませんが呼び出す方も大変ですね。

[225] Posted by buzei at 2008/02/24 23:46:55
0 point | Link (1) | Trackback (0) | Comment (0)

＋ 

A WindowsのActivePerl に Jcode.pmをインストールする方法

－ 

A WindowsのActivePerl に Jcode.pmをインストールする方法

Perlで日本語を扱うWebアプリを開発する際に必要になるのが、文字コード（エンコード）を変換するためのモジュールです。Webアプリのターゲットとなる運用環境でPerl 5.8が使えるのであればEncodeモジュールを利用す...

Perlで日本語を扱うWebアプリを開発する際に必要になるのが、文字コード（エンコード）を変換するためのモジュールです。Webアプリのターゲットとなる運用環境でPerl 5.8が使えるのであればEncodeモジュールを利用すれば良いのですが、レンタルサーバーによっては古いバージョンのPerlしか使えないという厳しい現実があります。そういう場合は、文字コードの変換にJcodeモジュール(Jcode.pm)利用することになります（日本で提供されているレンタルサーバーであればJcodeモジュールは大体使えるようです）が、JcodeモジュールはPerlの配布パッケージには含まれていないため、自分でWebアプリの間発環境を構築する場合は、別途インストールする必要があります。

Windows にインストールしたActivePerlにJcodeモジュールをインストールする方法も基本的にはUNIX環境でのインストールと同じです。

ただし、Jcodeモジュールの配布サイトには、書庫ファイルからのインストール方法も記述されていますが、makeコマンドが使用できないとインストールできない（Windows環境ではmakeコマンドは通常インストールされていない）ので、CPANモジュールからインストールことにします。

1.CPANモジュールの起動
Windowsのコマンドラインから
>perl -MCPAN -e shell
と入力しCPANモジュールを起動する。

2.Jcode.pmのインストール
cpan> install Jcode
と入力するとJcode.pmのインストールが行われます。

3.CPANモジュールから抜ける
インストールが終了したら
cpan> q
と入力しCPANモジュールから抜けます。

Jcode.pm - jcode.pl の後継、Encode.pm への架け橋

*追記
どうも上記の方法ではうまくいかないようです。

JcodeだけでなくActivePerlにモジュールを追加する場合は、Perl Package Managerから行う必要があるようです。Perl Package Managerを使用してモジュールをインストールする手順は以下の通りです。

1.コマンドプロンプトからppm と入力してPerl Package Managerを起動します。

2.メニューから[View][All Package]を選択してPackageのリストを表示します。

3.インストールしたいパッケージを選択してインストールを実行する。

[133] Posted by buzei at 2007/11/29 06:35:13
0 point | Link (2) | Trackback (0) | Comment (0)

＋ 

A Amazon 画像付き商品リンク作成フォーム

－ 

A Amazon 画像付き商品リンク作成フォーム

ブログ等に貼り付けるためのAmazonの商品リンクを、Amazon ECS のRESTリクエストを利用して、画像付きで生成するフォームを作成しました。商品のASINとアソシエイトIDを入力して作成ボタンをクリックすると画像付きの...

ブログ等に貼り付けるためのAmazonの商品リンクを、Amazon ECS のRESTリクエストを利用して、画像付きで生成するフォームを作成しました。商品のASINとアソシエイトIDを入力して作成ボタンをクリックすると画像付きのアマゾンアフィリエイトリンクが作成されます。

Amalink - Amazon 画像付き商品リンク作成フォーム

ソースファイル（amalink.cgi、amalink.htmlt）も公開しておきますので、レイアウトや表示内容が気に入らない場合は適当にカスタマイズしてください。文字エンコードはUTF-8。perl 5.8 以降に対応。JavaScriptも少し使ってます。

参考：
Amazon ECS 4.0　解説1 RESTリクエストのパラメータ
Perl 5.8でUTF-8の文字コードを扱う

俺流amazonの作り方―Amazon Webサービス最新活用テクニック 著者：水野 貴明 価格：2,730円 アスキー by Amalink

[48] Posted by buzei at 2007/06/22 10:17:22
0 point | Link (2) | Trackback (0) | Comment (0)