[比較]の検索結果

＋ 

B 削除されました

  ブックマーク先へ

－ 

B 削除されました

  ブックマーク先へ

削除されました

削除されました

[2371] Posted by kagahiro at 2014/03/15 00:28:15
0 point | Link (0) | Trackback (0) | Comment (0)

＋ 

A 顔認識技術

－ 

A 顔認識技術

顔認識技術は顔画像から人を自動的に識別するための技術で、画像内の顔と思われる部分を抜き出し、顔面画像データベースと比較することで識別を行う生体認証の一種で、自動販売機や企業の入退管理システムといったセ...

顔認識技術は顔画像から人を自動的に識別するための技術で、画像内の顔と思われる部分を抜き出し、顔面画像データベースと比較することで識別を行う生体認証の一種で、自動販売機や企業の入退管理システムといったセキュリティシステムに利用されている。

現在は、認証精度が99.5%程度まで向上しており、メガネをつけるなど顔の一部を隠したり、表情が違っていても識別できるようになっている。

「Google Glass」向け顔認識技術のAPI、今週中にも公開へ
Sony Japan | 技術情報｜顔画像認識技術

[2305] Posted by kagahiro at 2013/06/04 15:53:11
0 point | Link (3) | Trackback (0) | Comment (0)

＋ 

A アップル、iPad、iPodを最大16000円の大幅値上げ

－ 

A アップル、iPad、iPodを最大16000円の大幅値上げ

アップルがタブレット端末のiPad、iPad mini、オーディオプレイヤーのiPodなどの価格を、最大1万6000円も大幅に値上げしていたことが明らかになった。自民党の安倍政権による円安政策によって、ドル円相場は昨年末か...

アップルがタブレット端末のiPad、iPad mini、オーディオプレイヤーのiPodなどの価格を、最大1万6000円も大幅に値上げしていたことが明らかになった。

自民党の安倍政権による円安政策によって、ドル円相場は昨年末から約20％程度の円安水準となっており、値上げ幅はほぼ同程度となっている。

中国で生産されているはずのiPadやiPodが、円安ドル高によって値上がりするメカニズムはよくわからないが、時間の問題で他のアップル製品も値上げされる可能性が高いので、アップルブランドの製品を買うつもりなら早めに買っておいたほうが良さそうだ。

アップル、iPad や iPod touch 従来モデル等を一斉値上げ
アップルがiPadを最大1.3万円ひっそり値上げ 比較表で見る新旧価格（追記）

[2299] Posted by kagahiro at 2013/05/31 23:31:35
0 point | Link (1) | Trackback (0) | Comment (0)

＋ 

A [Perl]UTF-8でエンコードされた英数字の全角半角変換を行うコード

－ 

A [Perl]UTF-8でエンコードされた英数字の全角半角変換を行うコード

まずカタカナより比較的プログラミングしやすそうな英数字の全角半角変換から作成します。半角から全角への変換の処理手順は、・半角英数字の場合は、同じ全角英数字に置き換えて戻り値として返す文字列に連結・それ...

まずカタカナより比較的プログラミングしやすそうな英数字の全角半角変換から作成します。

半角から全角への変換の処理手順は、

・半角英数字の場合は、同じ全角英数字に置き換えて戻り値として返す文字列に連結
・それ以外の文字の場合はそのまま戻り値として返す文字列に連結

また、全角から半角への変換の処理手順は、

・全角英数字の場合は、同じ半角英数字に置き換えて戻り値として返す文字列に連結
・それ以外の文字の場合はそのまま戻り値として返す文字列に連結

となります。

文字コードはそれぞれ以下の通りですので、これらに該当する文字があったら置き換えを行います。

半角数字:0 - 9
30 - 39

全角数字:０ - ９
EFBC90 - EFBC99
2バイト目まではEFBC

半角アルファベット大文字:A - Z
41 - 5A

全角アルファベット大文字:Ａ - Ｚ
EFBCA1 - EFBCBA
2バイト目まではEFBC

半角アルファベット小文字:a - z
61 - 7A

全角アルファベット小文字:ａ - ｚ
EFBD80 - EFBD9A
2バイト目まではEFBD

以下が英数字の半角から全角へ、全角から半角への変換を行うコード（プログラム）です。

#!/usr/bin/perl

use strict;
use warnings;
use Encode;

my $hanAlnum = "ABCDEい12345あabcde";
my $zenAlnum = "ＡＢＣＤＥい１２３４５あａｂｃｄｅカ";

my $zenstr = han2zen_alnum($hanAlnum);
Encode::from_to($hanAlnum, 'utf8', 'cp932');
Encode::from_to($zenstr, 'utf8', 'cp932');
print "$hanAlnum ---> $zenstr\n";

my $hanstr = zen2han_alnum($zenAlnum);
Encode::from_to($zenAlnum, 'utf8', 'cp932');
Encode::from_to($hanstr, 'utf8', 'cp932');
print "$zenAlnum ---> $hanstr\n";

# UTF-8でエンコードされた半角英数字を全角英数字に変換する
sub han2zen_alnum {
    my ($src) = @_;

    my $srclen = length($src);
    my $pos = 0;
    my $dest = '';
    while ($pos < $srclen) {
        my $code = ord substr($src, $pos, 1); # 先頭のASCIIコード値を取得
        my $bytelen = _bytesize($code);

        my $lastbyte = 0;
        my $bytechar = '';
        my $flagged_utf8 = ''; 
        if ($code >= 0x30 && $code <= 0x39) { # 数字
            $lastbyte = 0x90 + ($code - 0x30);
            $bytechar = pack("C3", 0xEF, 0xBC, $lastbyte);
            $dest .= $bytechar;
        }
        elsif ($code >= 0x41 && $code <= 0x5A) { # 大文字英字
            $lastbyte = 0xA1 + ($code - 0x41);
            $bytechar = pack("C3", 0xEF, 0xBC, $lastbyte);
            $dest .= $bytechar;
        
        }
        elsif ($code >= 0x61 && $code <= 0x7A) { # 小文字英字
            $lastbyte = 0x81 + ($code - 0x61);
            $bytechar = pack("C3", 0xEF, 0xBD, $lastbyte);
            $dest .= $bytechar;
        }
        else {
            $dest .= substr($src, $pos, $bytelen);
        }
        $pos += $bytelen;
    }

    return $dest;
}

# UTF-8でエンコードされた全角英数字を半角英数字に変換する
sub zen2han_alnum {
    my ($src) = @_;

    my $srclen = length($src);
    my $pos = 0;
    my $dest = '';

    while ($pos < $srclen) {
        my $code = ord substr($src, $pos, 1); # 先頭のASCIIコード値を取得
        my $bytelen = _bytesize($code);
        my $hit = 0;
        if ($code == 0xEF) { # 全角英数の場合は1バイト目がEF
            my $code2 = ord substr($src, $pos + 1, 1);  # 2バイト目
            my $code3 = ord substr($src, $pos + 2, 1);  # 3バイト目
            if ($code2 == 0xBC) {
                if ($code3 >= 0x90 && $code3 <= 0x99) {
                    $dest .= chr(0x30 + ($code3 - 0x90));
                    $hit = 1;
                }
                elsif ($code3 >= 0xA1 && $code3 <= 0xBA) {
                    $dest .= chr(0x41 + ($code3 - 0xA1));
                    $hit = 1;
                }
            }
            elsif ($code2 == 0xBD) {
                if ($code3 >= 0x80 && $code3 <= 0x9A) {
                    $dest .= chr(0x61 + ($code3 - 0x80));
                    $hit = 1;
                }
            }
        }
        if(!$hit) {
            $dest .= substr($src, $pos, $bytelen);
        }
        $pos += $bytelen;
    }

    return $dest;
}

# 文字のバイト長を求める
sub _bytesize {
    my $code = shift;
    my $size = 1;
    if (0x80 & $code) { # 1バイト文字以外
        $code <<= 1;
        for my $i (2 .. 8) {
            $size++;
            $code <<= 1;
            last if (!(0x80 & $code));
        }
    }
    return $size;
}

[2250] Posted by kagahiro at 2012/12/19 16:54:42
0 point | Link (1) | Trackback (0) | Comment (0)

＋ 

A Perlで全角半角変換を行う方法

－ 

A Perlで全角半角変換を行う方法

日本語の文章では半角の英数字と全角の英数字、また、半角のカタカナと全角のカタカナが混在していることがよくあります。意味は半角でも全角でも同じですので、コンピュータで処理する場合はどちらかに統一してから...

日本語の文章では半角の英数字と全角の英数字、また、半角のカタカナと全角のカタカナが混在していることがよくあります。意味は半角でも全角でも同じですので、コンピュータで処理する場合はどちらかに統一してから処理したいところです。

Perlで全角半角変換を行う主な方法としては、

・標準モジュールのEncode.pmを使う
・Unicode::Japaneseモジュールを使う
・全角半角の変換に特化したLingua::JA::Regular::Unicodeモジュールを使う

などがあります。

Encode.pmは標準モジュールですので比較的使いやすいですが、euc-jp以外の文字エンコードの場合はeuc-jpに変換する必要があります。

Unicode::Japaneseモジュールは、現状では一番使いやすいと思われますが、標準モジュールではないのでレンタルサーバーで動かすWebアプリケーションではちょっと使いにくい面もあります。

Lingua::JA::Regular::Unicodeは、全角半角の変換に特化したモジュールですので非常に軽量ですが、全角半角の変換以外の処理を考えるとuse utf8;しないと動作しないというのはかなり面倒です。

これらのモジュールを使った全角半角の変換のコードについては、以下のブログ記事などに記述されています。

Encodeで全角半角変換
Perl で半角カナと全角カナの変換をする : Serendip - Webデザイン・プログラミング
perl - で全角半角変換をモダンに行う

しかし、いずれの方法もそれぞれ若干使いにくい面があるので、モジュールを使わずに自力で全角半角変換を行う方法を考えたいと思います。

プログラマのための文字コード技術入門 (WEB+DB PRESS plus) (WEB+DB PRESS plusシリーズ)
技術評論社 著者：矢野 啓介

amazon.co.jpのカスタマーレビューを見る
powered by amalink

[2247] Posted by kagahiro at 2012/12/14 23:52:52
0 point | Link (4) | Trackback (0) | Comment (0)

＋ 

A 世界2位のスーパーコンピュタ「京（けい）」

－ 

A 世界2位のスーパーコンピュタ「京（けい）」

京（けい）は、文部科学省を中心に開発が進められた次世代スーパーコンピュータシステムの名称で、理化学研究所次世代スーパーコンピュータ開発実施本部が開発主体となって、総事業費約1120億円という巨額の予算が投...

京（けい）は、文部科学省を中心に開発が進められた次世代スーパーコンピュータシステムの名称で、理化学研究所次世代スーパーコンピュータ開発実施本部が開発主体となって、総事業費約1120億円という巨額の予算が投じられた。

2009年11月の事業仕分けで民主党の蓮舫議員に「2位じゃだめなんですか？」と言われ予算削減（事実上の凍結）の対象になったが、著名な学者らがこぞって反対したため予算の復活に成功している。

2011年6月、LINPACKベンチマークにおいて8.162ペタフロップスを達成し、TOP500リストの首位を獲得。2011年11月、最終構成でのLINPACKベンチマークにおいて世界初の10ペタフロップスを達成して、再びTOP500リストの首位を獲得したが、2012年6月のTOP500では米IBM製IBM Sequoiaに記録を抜かれわずか1年で世界2位に転落している。

世界2位に転落したとはいえ従来のスパコンと比較すると格段に高速であるため、ビッグデータの解析やシミュレーションなどでの活用が期待されている。

京 (スーパーコンピュータ)
世界最速のスーパーコンピュータ「京」が支える最先端の科学技術とものづくり：政府広報オンライン
理化学研究所 次世代スーパーコンピュータの開発・整備
スパコン 京コンピュータ｜独立行政法人理化学研究所 計算科学研究機構(AICS)

スーパーコンピューターを20万円で創る (集英社新書)
集英社 著者：伊藤 智義

amazon.co.jpのカスタマーレビューを見る
powered by amalink

[2217] Posted by kagahiro at 2012/06/19 12:32:14
0 point | Link (3) | Trackback (0) | Comment (0)

＋ 

B SOY CMS2

  ブックマーク先へ

－ 

B SOY CMS2

  ブックマーク先へ

「SOY CMS2」は、開発者による独立した有志の組織「SOY CMS2 Developer Team」が主体となって開発されているオープンソース（ライセンスはGPLv2）の汎用CMS。新テンプレートエンジンや新しいWYSIWYGエディタが導入さ...

「SOY CMS2」は、 開発者による独立した有志の組織「SOY CMS2 Developer Team」が主体となって開発されているオープンソース（ライセンスはGPLv2）の汎用CMS。新テンプレートエンジンや新しいWYSIWYGエディタが導入され、SOY CMS1系と比較すると、Webサイトをより直感的に、より効率的に管理できるパブリッシングツールとなっている。

SOY CMS2 - オープンソースCMS

[2083] Posted by kagahiro at 2010/12/03 14:00:05
0 point | Link (1) | Trackback (0) | Comment (0)

＋ 

B CGI APPS 1.0をリリース

  ブックマーク先へ

－ 

B CGI APPS 1.0をリリース

  ブックマーク先へ

ホームページでよく利用される、掲示板、Q&A、共有ブックマーク（リンク集）、連絡フォーム といった機能を、まとめて簡単にホームページに導入（一部機能だけの導入も可能）できる比較的簡単なPerlプログラム「CGI ...

ホームページでよく利用される、掲示板、Q&A、共有ブックマーク（リンク集）、連絡フォーム といった機能を、まとめて簡単にホームページに導入（一部機能だけの導入も可能）できる比較的簡単なPerlプログラム「CGI APPS 1.0」をリリースしました。ライセンスはMITライセンスですので、無料で自由にカスタマイズして利用できますが、動作については無保証です。

「CGI APPS」は、「掲示板やリンク集は欲しいけどCMSを導入するのは大げさすぎる」「Q&Aだけでいいのでもっと安くして」などとというような個人や中小企業のホームページでの利用を想定しています。

CGI APPS の特徴

• CGIの開発言語として世界中で広く利用されているPerlによる実装
• テンプレートエンジン（HTML::Template）による処理とデザインの分離
• テキストファイルベースのデータ管理
• 管理者向けユーザー認証機能

CGI APPS

「CGI APPS 1.0」のリリースにともない、そのベースとなった 「メールフォームCGI」 「Q&A CGI」 「ブックマークCGI」 「掲示板CGI」は、 ファイルそのまま残しますが更新しません。

[2075] Posted by kagahiro at 2010/11/14 23:38:58
0 point | Link (3) | Trackback (0) | Comment (0)

＋ 

A MITライセンス

－ 

A MITライセンス

MITライセンスは、マサチューセッツ工科大学（MIT）を起源とするオープンソースライセンスの一つ。オープンソースであるか無いかに関わらず再配布が可能なBSDライセンスがベースになっており、GPLと比較すると制限は...

MITライセンスは、マサチューセッツ工科大学（MIT）を起源とするオープンソースライセンスの一つ。オープンソースであるか無いかに関わらず再配布が可能なBSDライセンスがベースになっており、GPLと比較すると制限はかなり緩くなっている。

著作権表示および許諾表示のソフトウェアのすべての複製または重要な部分への記載と、作者または著作権者がソフトウェアに関する一切の請求、損害、その他の義務について何らの責任も負わないことが主な内容。

MIT License
The MIT License

[2054] Posted by kagahiro at 2010/10/19 13:12:12
0 point | Link (1) | Trackback (0) | Comment (0)

＋ 

A VPS（仮想専用サーバー）

－ 

A VPS（仮想専用サーバー）

VPS(Virtual Private Server、仮想専用サーバー)とは、レンタルサーバーのサービスの一つで、共用サーバーを仮想化ソフトを使用して仮想的に専用サーバーと同様に管理者権限で使用できるようにしたサービス。ユーザー...

VPS(Virtual Private Server、仮想専用サーバー)とは、レンタルサーバーのサービスの一つで、共用サーバーを仮想化ソフトを使用して仮想的に専用サーバーと同様に管理者権限で使用できるようにしたサービス。ユーザーが1台のサーバーを占有する専用サーバーより比較的安価に提供される。

ServersMan@VPS
専用サーバー・VPSならSaaSes

[2007] Posted by kagahiro at 2010/08/28 10:09:35
0 point | Link (5) | Trackback (0) | Comment (0)