株式会社シグマデザイン社長ブログ

ゴーン氏の報酬が８．９億円

2010-06-23T03:34:00Z

ヤフーニュースで、カルロスゴーンさんの今年度の報酬が、８．９億円で国内最高額ということが報じられていた。

いつものことだけど、「日本ってスケールが小さいなぁ。」と思ってしまった。

ゴールドマンサックスやモルガンスタンレーのCEOの報酬が、６０億とか５０億円。

ジョージ・ソロスなんて、３０００億円ですよ。たった１年の報酬だけで。

日本では、あまり金を稼ぐ事がいい事とは思われない傾向にあるけど、坂本龍馬にせよ、河井継之助にせよ、金儲けに長けている人たちが、今の日本の礎を築いたように思う。

何らかの事を為すためには、必ず資金が必要で、金儲けというのは、すごくいい事なんだと最近考えるようになってきた。

歴史を知り、人物を知るということは、楽しいし勉強になる。

勉強しなければならないことは、たくさんある。学生時代に、もっと勉強しとけばよかったと今になって思う。

今、やらなければならないと思う勉強は、数学・歴史・地理かな。

地理なんて、学生時代は全く興味なかったけど、文明の発展は、極めて密接に地理的な要素と関連しているんですよね。

↓河井継之助を題材にした司馬遼太郎さんの作品「峠」

↓何回読んでも面白い坂本龍馬をテーマにした「竜馬がゆく」

龍馬が勝海舟に出会って、自分の為すべき事を見つけたように、自分も自分が人生をかけて為すべき事を教えてくれる人物に出会えればいいなと切に思う。

ドメイン管理費の値下げ対決が勃発！

2010-05-01T15:37:50Z

ウェブサイトを活用して、ビジネスをする場合、たくさんのドメインを所有することになりますが、数が増えてくると、これがけっこうなコストになってきます。

ドメインの取得・管理コストをできるだけ下げたいと思って、いろいろなドメインの会社をこまめにチェックしています。

アメリカの「.us」ドメインがかなり安いのですが、基本的にはアメリカ人にしか取れないので、私たちには利用できません。もっとも、アメリカに１つ法人を設立すれば利用できるようです。アメリカでの法人設立は、日本に比べるとはるかに簡単・低コストにできるので、本気で大量にドメインを利用するのであれば、アメリカに会社を１つ作るのもありかもしれません。

さて、日本での有名どころといえば、ムームードメインとお名前.comなのですが、この２社が熾烈な価格競争を繰り広げています。

お名前.comでは、新規の登録が３８０円／年というキャンペーンを「.com」「.info」などのドメインで継続的に実施しています。

先週までは、「.com」が３８０円でしたし、今は「.info」が３８０円です。

さらに、移管するとお得な料金プランが利用できるようなキャンペーンもお互いに繰り広げています。お名前.comでは、「.com」ドメインで、移管料金が３８０円、次の年から９２０円という移管キャンペーンをやっています。

対して、ムームードメインでは、７５０円で実施しています。

ドメインの管理業者で価格競争が起こり始めているみたいで、大量のドメインを所有している人には、うれしい限りだと思います。

ドメインの管理は、よほど愛着のあるドメインでない限り１年に１回なので、以外と放ったらかしにしがちですが、複数のドメイン会社を常にチェックし、キャンペーンを利用することで、ドメイン管理コストを下げることができます。

おそらく、ドメイン管理会社からすれば値下げ合戦は頭の痛い問題だと思います。昔はけっこう儲かる事業だったと思うのですけど、これだけ価格競争が起きてくると、もはやあまり儲かる事業ではなくなっているのではないでしょうか。

圧倒的な差別化ができないような事業以外は、みんながやり始めて、価格競争が起こり始めた時くらいが潮時だと思います。

ソフトバンクの「光の道」論に全面反論する、に再反論する。

2010-04-29T14:58:26Z

孫社長の「光の道」論に対して、佐々木氏が反論しているが、私は、その佐々木氏の反論に再反論する。

佐々木氏の主張は、１つにまとめることができる。

要するに、IT技術が活用されていないのは、インフラが整っていないからではなく、既得権益などによって、インフラを最大限活用できていないからである。したがって、インフラ整備よりもインフラを活用できるような体制の構築に重点を置くべき、ということを言いたいのだと思う。

この二人の意見が異なっているのは、おそらく、１０年〜２０年後の未来をどのようにとらえているかの違いだと思う。

佐々木氏は、将来のインターネットの活用シーンをパソコンや携帯など、現在インターネットに接続されている主なデバイスに限定して考えているのではないだろうか。

別の言い方をすれば、私たちは、近い将来、何も意識せずにインターネットに接続されている多種多様なデバイスを利用することになる、ということを理解していないのではないかということだ。

これは、佐々木氏が自分の主張を強化するために挙げているデータを見れば、明らかである。（「なぜ（固定回線の）インターネットを使わないのか」というアンケート結果を持ち出していることなど。）

孫社長は、インターネットを活用するデバイスをパソコンや携帯に限定していない。とにかく、現在では考えられないような物まで含めたあらゆる電子機器が、私たちが意識することもなくインターネットに接続された状態で利用される時代が来ると考えているのだろう。フォトビジョンがいい例になる。

そして、そこに新たな世界的競争力を持つことができる、巨大市場が出現すると考えており、それを実現するためにも、光の道が必要だと主張しているのだろう。

私たちが、全くインターネットに接続されているということを意識せずに使う電子機器が増えてくると、ブロードバンドに接続されているのが当然の状態になり、パソコンを持っていないからとか、料金が高いからというのは、光ファイバーを契約しないという理由にはもはやならないという時代が近い将来に到来するであろう。

佐々木氏の結論である、「今こそテクノロジーの活用方法を再構築すべき時だ」というのは、今存在している市場をITで効率化して少しだけパイを大きくするということが大前提になっているが、孫社長が考えているのは、光の道を基盤に、既存の産業などを改善してパイを大きくするというだけではなく、今までの時代には存在しなかった全く新しい国際的競争力を有する巨大市場を創出するということではないだろうか。

確かに、佐々木氏の主張していることでも、多少なりとも国を豊かにするだろうし、佐々木氏が想定していると考えられる未来像を前提にすれば、孫社長に対する反論も的を得ているように思える。

しかし、孫社長の「光の道」論の方がはるかに、日本を豊かにする可能性が高いし、そもそも、私たちの生活がこの先どうなるのかということの捉え方が根本的に違うのだ。

ソフトバンクの「光の道」論に全面反論する（上）
著者：佐々木俊尚
http://japan.cnet.com/blog/sasaki/2010/04/29/entry_27039509/

世界中から水着ギャルの画像を集めました。

2010-04-16T21:17:27Z

フリッカーAPIを使って、世界中の水着美人が見られるサイトを作りました。

国やイベント別に見ることができるので、いろいろな国の文化なども感じることができます。

このサイトを作りながら、いろいろなアイデアが続々と湧いてきましたので、おもしろいサイトがたくさん作れそうです。

いろんなウェブサービスを利用していますが、フリッカーAPIは、かなり活用できそうです。特にWEBの世界では、文字より画像の方がインパクト大きいので、フリッカーAPIはほんと楽しみ。

⇒ 世界のビキニ美女

RSSの自動生成ツール配布中！RSSでSEO効果抜群！

2010-04-12T08:09:18Z

プログラマーの三大美徳とされているのが、以下の３つです。

１、怠慢
２、短気
３、傲慢

それに則っり、いろいろと自動化しています。

今回は、RSSを自動で生成するプログラムを書いてみました。

グーグルウェブマスターツールなどで、自分の運営しているサイトへのリンク元を調べたことがある人ならわかると思いますが、実は、RSSを自動で収集しているようなサイトからのリンクがけっこう多いのです。

つまり、質はわかりませんが、RSSを吐き出しておけば、自動的にリンクが増えていくのです。

アメリカのアマゾンで高い評価を得ているSEO本である「SEO Made Simple」にもRSSを使ったSEOの手法が書かれていますので、効果はあると思います。いずれにせよこのツールを使えば自動ですから、やっておく方がよいでしょう。

↓SEO Made Simple

ダウンロードや設定方法は、こちらのページをご覧ください。

最強のテキストエディタEmacsをカスタマイズ

2010-04-11T00:14:45Z

HTMLしか書かなかった時は、テキストエディタにこだわるなんてことはなかったんですけど、Perlでプログラムを書き始めるようになってからは、複雑な構造を理解するために、やっぱりテキストエディタにこだわる必要が出てきました。

そこで、最強のテキストエディタと言われているEmacsを使い始めました。

最初は、秀丸などのスタンダードなエディタとは、操作方法が全く異なるので戸惑いましたが、あきらめずに本やWebで調べながら使い続けました。不思議なものですが、しばらく使っていると慣れてきて、もはやEmacs以外のエディタが使えなくなってしまうほど体に馴染んでしまいました。

エディタの使い方を覚えるのに、本１冊が出版されています。かなり役立ちます。エディタを使うのにこんな本が必要というのがすごいと思いますが・・。

↓入門 GNU Emacs

さらに、いろいろとカスタマイズすると、使いやすさが格段に増します。ほんとに素晴らしいツールです。これがフリーというのは、すごいことですよ。

カスタマイズした中で感動したのが、透明度を変更できることです。複数のウィンドウを開いている時に非常に便利なのですが、それより何より見た目が美しい。

本やWebで調べて、カスタマイズしたものをいくつか書いておきますので、参考になればうれしいです。

;; ビープ音を消す (setq visible-bell t)



;; ツールバーを消す

(tool-bar-mode 0)

;; perlをcperlモードにする

(defalias 'perl-mode 'cperl-mode)

;; CGIファイルにcperlを適用

(setq auto-mode-alist (cons '("\\.cgi$" . cperl-mode) auto-mode-alist))

;; インデントをスペース４つにする

(add-hook 'cperl-mode-hook

          '(lambda ()

                  (cperl-set-style "PerlStyle")))

;; 起動時のフレームサイズ

(setq initial-frame-alist '((top . 25) (left . 5)

			    (width . 190) (height . 53)))

;; モードラインの背景色を変更

  (set-face-background 'modeline "MediumPurple2")

;; 透明度設定 (if window-system (progn (set-background-color "Black") (set-foreground-color "LightGray") (set-cursor-color "Gray") (set-frame-parameter nil 'alpha 78) ))

中古車情報サイトを作りました。カーセンサーラボWEBサービスを活用。

2010-03-31T14:56:29Z

前回の記事「カーセンサーラボのWEBサービスを使って、中古車のアフィリサイトを作ってみる。」で、カーセンサーラボウェブサービスの使い方を少し書きましたが、実際に中古車情報サイトを作ってみました。

デザインは、以前に楽天ウェブサービスを使って作った楽楽サーチとほとんど同じです。

ウェブサービスを活用したサイトを作るのは、２つ目なので、少し考え方に慣れてきて、コードもかなり少なくなりました。

「下手な考え休むに似たり。」（※１）と言いますが、考えすぎて何もしないよりは、あまり考えずにとにかく手を動かして、数をこなす方がはるかに成長するということを改めて実感。

今回は、価格順にソートする機能や、ページング機能も付けましたので、かなり使いやすくなったと思います。

ほんとは、これにヤフー、グーグル、フリッカーのAPIを組み込んで、関連するおもしろい画像や動画を同時に表示させる予定だったのですが、それは次の機会にします。

おもしろいアイデアを出すために、この調子で、どんどん各社のウェブサービスを試していきます。

新しく作ったサイトは、中古車情報サイトCARMANIAです。

※１. 正しくは、「下手の考え休むに似たり」です。

カーセンサーラボのWEBサービスを使って、中古車のアフィリサイトを作ってみる。

2010-03-20T20:38:41Z

前回は、楽天WEBサービスを使ったサイトを作ってみましたが、第２弾として、カーセンサーラボのウェブサービスを使ってサイトを作ろうと思います。

まだ、WEBサービスを使ったサイト作りに挑戦して１ヶ月も経ってないし、それほど数を作ったわけでもないけど、現段階の感想としては、どんなWEBサービスでも、ほとんどやり方は同じだという感じがします。

リクエストURLを作って、それにアクセスし、返ってくるXMLデータを加工してページを作ればいいだけです。

これからは、自分の実力アップのためと、同じようなことを考えている人のために、コードを公開していこうと思います。

とりあえず、テストとして、本当にカーセンサーラボのウェブサービスが使えるのかを試すために、簡単なものを作ってみました。車種のカタログデータを取得することができるみたいなので、ベンツのカタログリストを５件取得して、画像を表示させるプログラムです。


#! /usr/bin/perl -w
use strict;
use LWP::Simple;
use XML::Simple;
use Data::Dumper;

# リクエストURLとキーワードの設定
my $request_url = 'http://www.carsensorlab.net/webapi/V2/catalogSearch/?brand=';
my $brand_name = 'ベンツ';
my $count = '5'; # １ページに表示する件数
my $count_url = "&count=$count"; # リクエストURLに追加する変数

# キーワードをunicodeに変換
$brand_name =~ s/([^\w ])/'%' . unpack('H2', $1)/eg;
$brand_name =~ tr/ /+/;

# リクエストURLの完成形
my $url = $request_url . $brand_name . $count_url; # 完成形リクエストURL

# レスポンスの取得
my $response = LWP::Simple::get($url) or die ("Can't get data from $url: $!");
my $parser = XML::Simple->new;
my $data = $parser->XMLin ($response);

# サーバー出力
print "Content-type: text/html; charset=utf-8\n\n";
print Dumper ($data);
print Dumper ($data->{'CatalogCar'}->[0]->{'ImageFrontUrl'});
print "ヒット数：$data->{'TotalCount'}件\n";
for (0..$count) {
    if (!$data->{'CatalogCar'}->[$_]->{'ImageFrontUrl'}) {
	next;
    }
    else {
	print "{'CatalogCar'}->[$_]->{'ImageFrontUrl'}\" />\n";
    }
}

実際にCGIとして使う時には、削除するかコメントで無効化するのですが、データ構造を確認するために、最後の方にあるにある「print Dumper ($data);」で取得したXMLデータをパースしたものを表示させます。

Data::Dumperモジュールを使うと簡単に、データ構造を確認することができます。

見てみると、以下のようなデータ構造になっていることがわかります。


$VAR1 = {
          'CatalogCar' => [
                          {
                            'BodyType' => "\x{30bb}\x{30c0}\x{30f3}",
                            'ImageFrontUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S003/ME_S003_F001_M001_1.jpg',
                            'EngineCapacity' => "1995\x{ff5e}2597",
                            'Comment' => {},
                            'BodySize' => [
                                          "4450\x{d7}1690\x{d7}1375",
                                          "4430\x{d7}1705\x{d7}1360",
                                          "4450\x{d7}1690\x{d7}1355"
                                        ],
                            'CatalogUrl' => 'http://catalog.carsensorlab.net/mercedes-benz/190_class/f001/m001/',
                            'Model' => "190\x{30af}\x{30e9}\x{30b9}",
                            'ImageInpaneUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S003/ME_S003_F001_M001_2.jpg',
                            'CatalogMobUrl' => 'http://csmob.jp/catalog/selectGrade.php?br=ME&md=S003&fm=F001&mc=M001',
                            'McKey' => 'TDAWMZAWMTAWMU1F1015',
                            'No' => '1',
                            'Brand' => "\x{30e1}\x{30eb}\x{30bb}\x{30c7}\x{30b9}\x{30fb}\x{30d9}\x{30f3}\x{30c4}",
                            'ProductionPeriod' => "1989\x{5e74}09\x{6708} \x{ff5e} 1990\x{5e74}07\x{6708}"
                          },
                          {
                            'BodyType' => "\x{30bb}\x{30c0}\x{30f3}",
                            'ImageFrontUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S003/ME_S003_F001_M002_1.jpg',
                            'EngineCapacity' => "1995\x{ff5e}2597",
                            'Comment' => {},
                            'BodySize' => [
                                          "4450\x{d7}1690\x{d7}1375",
                                          "4430\x{d7}1705\x{d7}1360",
                                          "4450\x{d7}1690\x{d7}1355"
                                        ],
                            'CatalogUrl' => 'http://catalog.carsensorlab.net/mercedes-benz/190_class/f001/m002/',
                            'Model' => "190\x{30af}\x{30e9}\x{30b9}",
                            'ImageInpaneUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S003/ME_S003_F001_M002_2.jpg',
                            'CatalogMobUrl' => 'http://csmob.jp/catalog/selectGrade.php?br=ME&md=S003&fm=F001&mc=M002',
                            'McKey' => 'TDAWMZAWMTAWMK1F1415',
                            'No' => '2',
                            'Brand' => "\x{30e1}\x{30eb}\x{30bb}\x{30c7}\x{30b9}\x{30fb}\x{30d9}\x{30f3}\x{30c4}",
                            'ProductionPeriod' => "1990\x{5e74}08\x{6708} \x{ff5e} 1991\x{5e74}07\x{6708}"
                          },
                          {
                            'BodyType' => "\x{30bb}\x{30c0}\x{30f3}",
                            'ImageFrontUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S003/ME_S003_F001_M003_1.jpg',
                            'EngineCapacity' => "1995\x{ff5e}2597",
                            'Comment' => {},
                            'ImageRearUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S003/ME_S003_F001_M003_2.jpg',
                            'BodySize' => [
                                          "4450\x{d7}1690\x{d7}1375",
                                          "4430\x{d7}1705\x{d7}1360",
                                          "4450\x{d7}1690\x{d7}1355"
                                        ],
                            'CatalogUrl' => 'http://catalog.carsensorlab.net/mercedes-benz/190_class/f001/m003/',
                            'Model' => "190\x{30af}\x{30e9}\x{30b9}",
                            'ImageInpaneUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S003/ME_S003_F001_M003_3.jpg',
                            'CatalogMobUrl' => 'http://csmob.jp/catalog/selectGrade.php?br=ME&md=S003&fm=F001&mc=M003',
                            'McKey' => 'TDAWMZAWMTAWM01F1015',
                            'No' => '3',
                            'Brand' => "\x{30e1}\x{30eb}\x{30bb}\x{30c7}\x{30b9}\x{30fb}\x{30d9}\x{30f3}\x{30c4}",
                            'ProductionPeriod' => "1991\x{5e74}08\x{6708} \x{ff5e} 1992\x{5e74}09\x{6708}"
                          },
                          {
                            'BodyType' => "\x{30bb}\x{30c0}\x{30f3}",
                            'ImageFrontUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S003/ME_S003_F001_M004_1.jpg',
                            'EngineCapacity' => "1995\x{ff5e}2597",
                            'Comment' => {},
                            'ImageRearUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S003/ME_S003_F001_M004_2.jpg',
                            'BodySize' => [
                                          "4450\x{d7}1690\x{d7}1375",
                                          "4430\x{d7}1705\x{d7}1360",
                                          "4450\x{d7}1690\x{d7}1355"
                                        ],
                            'CatalogUrl' => 'http://catalog.carsensorlab.net/mercedes-benz/190_class/f001/m004/',
                            'Model' => "190\x{30af}\x{30e9}\x{30b9}",
                            'ImageInpaneUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S003/ME_S003_F001_M004_3.jpg',
                            'CatalogMobUrl' => 'http://csmob.jp/catalog/selectGrade.php?br=ME&md=S003&fm=F001&mc=M004',
                            'McKey' => 'TDAWMZAWMTAWNE1F1015',
                            'No' => '4',
                            'Brand' => "\x{30e1}\x{30eb}\x{30bb}\x{30c7}\x{30b9}\x{30fb}\x{30d9}\x{30f3}\x{30c4}",
                            'ProductionPeriod' => "1992\x{5e74}10\x{6708} \x{ff5e} 1993\x{5e74}09\x{6708}"
                          },
                          {
                            'BodyType' => "\x{30cf}\x{30c3}\x{30c1}\x{30d0}\x{30c3}\x{30af}",
                            'ImageFrontUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S030/ME_S030_F001_M001_1.jpg',
                            'EngineCapacity' => '1598',
                            'Comment' => {},
                            'ImageRearUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S030/ME_S030_F001_M001_2.jpg',
                            'BodySize' => "3605\x{d7}1720\x{d7}1575",
                            'CatalogUrl' => 'http://catalog.carsensorlab.net/mercedes-benz/a_class/f001/m001/',
                            'Model' => "A\x{30af}\x{30e9}\x{30b9}",
                            'Color' => [
                                       "\x{30a8}\x{30f3}\x{30d0}\x{30fc}\x{30ec}\x{30c3}\x{30c9}",
                                       "\x{8d64}\x{8272}",
                                       "\x{30b9}\x{30ce}\x{30fc}\x{30db}\x{30ef}\x{30a4}\x{30c8}",
                                       "\x{767d}",
                                       "\x{30aa}\x{30fc}\x{30b7}\x{30e3}\x{30f3}\x{30d6}\x{30eb}\x{30fc}",
                                       "\x{9752}\x{8272}",
                                       "\x{30b8}\x{30e3}\x{30f3}\x{30b0}\x{30eb}\x{30b0}\x{30ea}\x{30fc}\x{30f3}",
                                       "\x{7dd1}\x{8272}",
                                       "\x{30e1}\x{30c6}\x{30aa}\x{30b0}\x{30ec}\x{30fc}",
                                       "\x{30b0}\x{30ec}\x{30fc}",
                                       "\x{30e0}\x{30fc}\x{30f3}\x{30e9}\x{30a4}\x{30c8}\x{30a2}\x{30b7}\x{30eb}\x{30d0}\x{30fc}",
                                       "\x{30b7}\x{30eb}\x{30d0}\x{30fc}"
                                     ],
                            'ImageInpaneUrl' => 'http://img.carsensorlab.net/CSphoto/catalog/ME/S030/ME_S030_F001_M001_3.jpg',
                            'CatalogMobUrl' => 'http://csmob.jp/catalog/selectGrade.php?br=ME&md=S030&fm=F001&mc=M001',
                            'McKey' => 'TDAZMDAWMTAWMU1F1011',
                            'No' => '5',
                            'Brand' => "\x{30e1}\x{30eb}\x{30bb}\x{30c7}\x{30b9}\x{30fb}\x{30d9}\x{30f3}\x{30c4}",
                            'ProductionPeriod' => "1998\x{5e74}09\x{6708} \x{ff5e} 1999\x{5e74}07\x{6708}"
                          }
                        ],
          'FirstPosition' => '1',
          'Status' => '200',
          'ResponseCount' => '5',
          'TotalCount' => '251'
        };

一見すると、リファレンスだらけなので、何のことかよくわからないのですが、画像を取り出すだけなら簡単にできます。画像のURLは「ImageFrontUrl」の部分の値に入っていますので、その部分まで１つずつ丁寧に矢印でデリファレンスしていけばいいわけです。

まず、$VAR1を$dataに置き換えて考えます。すぐ後にブレースがありますので、ハッシュです。

$data->{'CatalogCar'}

次に、ブラケットがありますので、配列です。この配列の部分に、車のリストが入っています。０にすれば１台目、１にすれば２台目、２にすれば３台目のデータになります。例えば、１台目のデータが欲しければ以下のようになります。

$data->{'CatalogCar'}->[0]

さらに、ブレースがありますので、またハッシュです。

$data->{'CatalogCar'}->[0]->{'ImageFrontUrl'}

これで、１台目の画像URLが取り出せます。

あとは、HTMLで書き出せば終わりです。ここまでくれば、HTMLさえ分かっていればページを作ることができると思います。

最後のループの部分で、ifを使っているのは、なぜかわかりませんが、何個か画像がないものがあったので、それをスキップするためです。

カーセンサーラボWEBサービスの使い方は、これで大体わかったので、ガリバーやグーなどのアフィリエイトをうまく取り込めば、おもしろいアフィリサイトが作れそうです。

二次元配列を使って、csvファイルから１万ページのサイトを一瞬で作成する方法。

2010-03-14T14:46:07Z

Perlでは、リファレンスが使えることが、大人のプログラマーへの一つの関門と言われているようです。

私も、例に漏れず、リファレンスを理解するのに少し時間がかかりました。ようやく、最近、理解し少し使えるようになってきました。

リファレンスを使えるようになったことで、最もよく使うのが二次元配列です。

大量のデータがcsvファイルに格納されていることはよくあります。ASPから提供されているもの、自分でこつこつ作ったもの、外注したものなど。

何にせよ、大量の有益なデータさえ手元にあれば、それを二次元配列に取り込んで、大量のページを有するサイトを一瞬で生成することができます。

以下は、csvファイルから、二次元配列にデータを取り込むためのサンプルコードです。もっといい方法を知っている方がいればぜひ教えてください。力を付けるために、自分で書いたコードをどんどん公開していこうと思っています。


#! /usr/bin/perl -w
use strict;

my @elements = ();
my @data = ();
my $i = 0;

while (<>) {
    chomp;
    @elements = split(/,/);
    for (0..@elements) {
        $elements[$_] =~ s/"(.*?)"/$1/ig;
    }
    for (0..@elements) {
        $data[$i]->[$_] = "$elements[$_]";
    }
    ++$i;
}

ダイヤモンド演算子を使っているので、実行する時に、取り込むファイルを引数として設定します。

最初のforブロックでは、正規表現を使ってダブルクォーテーションを取り除き、次のforブロックで２次元配列に格納しています。

後は、好きなようにHTMLファイルに出力すれば１万ページのサイトが一瞬で完成です。

プログラミングの勉強を始めてから、仕事の効率が劇的に改善にしました。

以前は、手をつけることができなかったような大量のデータを、簡単に扱えるようになりつつあります。

実は、スパイダーも実験的に飛ばして、いろんなサイトからデータを収集しています。データを自由自在に支配できるようになれば、おもしろくて仕方ないでしょうね。

オライリーの「詳説正規表現」の「はじめに」の部分に、「正規表現をマスターすることは、自分のデータを支配することなのだ。」と書いてありました。

全くそのとおりだと思います。

↓詳説正規表現

全自動アフィリエイトサイト。

2010-03-06T00:07:01Z

楽天ウェブサービスを使って、全自動でページが増えていく、アフィリエイトサイトを作ってみました。

楽天アフィリエイトの報酬支払いが現金になったことで、楽天アフィリエイトの魅力が、ぐっと上がったのでやってみようかなと。

楽天アフィリエイトって、圧倒的な量で攻めれば、ほっといてもある程度の売り上げが発生するんですよね。数年前に作って、ほったらかしのサイトから売り上げがあることもよくあることです。

ということで、自動的にページが量産されていく、楽天アフィリエイトに特化したサイトを作ってみました。

いろんな機能を付け足していって、うまく活用すれば、けっこうおもしろいことになるかもしれません。

他の会社も、おもしろそうなウェブサービスを提供されていますので、それらを活用して、これからいろんなサイトを作っていく予定です。

楽天ウェブサービスを活用したアフィリエイトサイト構築例　→　楽楽サーチ

ちなみに、Per＋CGIで作りました。モジュールを活用すれば、けっこう短時間で作れました。

薄くて、雑誌みたいな本ですが、これにけっこう役立つ情報が載っていました。

↓最新WebサービスAPIエクスプロ-ラ ~Amazon、はてな、Google、Yahoo! 4大Webサービス完全攻略

海外へ移住。

2010-02-25T17:30:14Z

トヨタがアメリカで徹底的に叩かれていますが、明らかに、アメリカ政府の政治的理由によるトヨタ潰しです。

もちろん、トヨタに責任のある事故が数件はあるのでしょうが、あまりにも非難が過激な感じがします。

アメリカ国内の失業率上昇、中国の台頭、オバマ大統領の支持母体に自動車産業の労組が含まれていること等々、真実かどうかはわかりませんが、政治的理由によるトヨタ潰し、と考えられてもやむを得ないような事実が多々あります。

また、自動車大国であり、環境産業で覇権を握ろうとしている、アメリカにとって、ハイブリッド車の販売が好調なトヨタは、絶対に潰しておかなければならない存在なのでしょう。

以前なら、日本政府に多少の気を遣っていたのでしょうが、今や、完全に日本は切り捨てられています。もしかすると、トヨタは完全に潰されてしまうかもしれません。もはや、アメリカは、日本などどうでもよくて、対中国との関係に苦心しているのでしょう。

日本の政治力は、アメリカや中国に全く太刀打ちできないほど低下しています。ただ、政治家の能力が低いというわけではなくて、大きな時代の流れとして、下降トレンドに入っているから、誰にも止められないというのが事実ではないでしょうか。

たとえ、どんなに優秀なリーダーが現れたとしても、時代の流れに逆らうことができないことは、歴史が証明しています。

成毛眞氏がツイッターでつぶやいてましたけど、今後、縮小していくことが確実な日本にいるよりも、勢いのある国に移住した方が、よりよい生活ができるような気がします。

遠くまで行かなくても、近場のアジアの国々を調べてみても、永住権が簡単に取れる国は、けっこうあります。

したがって、国籍は別にして、海外に移住するというのも、現実的な選択肢としてありだと思います。

機会があれば、アメリカを見限り、シンガポールに移住したジム・ロジャーズのように、永住したいと思えるような国を探しに、世界中を周ってみたいです。

↓冒険投資家ジム・ロジャーズ世界バイク紀行 (日経ビジネス人文庫)

↓冒険投資家ジム・ロジャーズ世界大発見 (日経ビジネス人文庫)

量は質に転化する。大量のＷｅｂサービスを展開。

2010-02-24T16:19:50Z

Ｐｅｒｌの勉強を始めてから、少しずつ自分のレベルが上がっていることが実感できるようになってきました。

せっかくＰｅｒｌが使えるようになってきたので、少しだけCGIの勉強もして、Ｗｅｂサービスをいくつか作り始めています。

Perlがある程度使えるようになった後、ＣＧＩを作る時に役立つ本がオライリーの「CGIプログラミング」です。

ＣＧＩは、Ｃ言語でも書けるのですが、この本は、ほとんどがＰｅｒｌで書かれているので、ＰｅｒｌでＣＧＩを書くなら、一読しておくと有益な本です。ＨＴＴＰやＣＧＩの基礎をしっかりと理解できるように書かれているので、HTMLとＣＳＳ専門の人にも役立つと思います。

今は、それほど大したものは作れませんが、少しずつ、おもしろい大規模なＷｅｂサービスをスタートさせていきたいと考えています。

Ｐｅｒｌのバイブルと言われている「ラクダ本」をはしめ、オライリーから出版されているＰｅｒｌ関連の本は全て買いました。

必要な情報は、ほとんどそろったので、これから貪欲に吸収していきたいと思います。

とにかく、自分が作れるものを大量に作り続ければ、少しずつ高度なものが作れるようになっていくでしょう。

量は質に転化するはず。

ヤフージャパンのソースコードに感動！

2010-02-01T16:56:52Z

しばらく、あるサイトの表示速度改善にこだわっていました。

結果として、表示速度を約２倍にすることができました。

いろいろ、調べて、考えて、改善することができましたが、その後に、国内でＮｏ．１であり、世界でもトップ１０に入るくらいのトラフィックがあるヤフーのソースコードを見てみました。

今までも、ヤフージャパンのソースコードは、何回も見ていたのですが、「Ｗｅｂページの表示速度」という観点から、改めて見てみると、あまりにも洗練されたコードが書かれていることに感動しました。

小林秀雄が「モーツアルト」の中で「模倣は独創の母である。ただ一人本当の母親である。」と言っていますが、優秀な作品などを徹底的に模倣しながら、表面的ではなく、徹底的に深く掘り下げて考えていくことが重要であるということを、心底理解することができました。

自分のレベルが低い時には、気付きもしなかったことに、後になって気付いたということは、自分が成長したということの証明であり、これほど楽しいことはありません。

「模倣は独創の母である。ただ一人本当の母親である。」

素晴らしい言葉です。

ツイッターを使ったＳＥＯツールを作りました。

2010-01-24T09:56:01Z

ソーシャルブックマークを利用したＳＥＯは、今では当然のように行われていますが、それと同じような感じで、ツイッターを使ったＳＥＯも効果があるようです。

自分のブログや、サイトにソーシャルブックマークの登録ボタンを付けておくことで、登録してもらいやすくなります。

これと同じようなことをツイッターでできるようにしました。コードを見ればわかると思いますけど、たった５行のPerlで書いたCGIで、できました。

Ｗｅｂページに、ボタンか何かを設置しておき、それをユーザーがクリックするだけで、そのページのＵＲＬが自動的に引用され、あとはつぶやくだけという状態になります。

１クリックするだけで、気になるページの感想などをつぶやくことができるので、ツイッターでつぶやいてもらえる可能性が高くなり、集客効果があるかと思います。

また、ＵＲＬを引用しますので、自分のブログやサイトにリンクが貼られることになりますので、ＳＥＯ効果も見込めます。

興味のある方は、使ってみてください。ＣＧＩモジュールを使っていますが、ほとんどのレンタルサーバーでインストールされていると思いますので、問題ないかと思います。

ダウンロードした後、解凍すると「tweet.cgi」というファイルがあるので、それをアップロードして、各サーバーで指定されている適切なパーミッションに変更します。

あとは、各ページに「tweet.cgi」へのリンクを貼るだけで、自動的に、参照元のＵＲＬが引用されます。

⇒ツイッターを使ったＳＥＯツールをダウンロードする！

ウェブページの表示速度を向上させる方法。

2010-01-20T14:01:25Z

ウェブページの表示速度が遅いサイトは、最悪の場合、ユーザーを逃がしてしまいます。

もし、そのサイトが何らかの形で利益を生むようなサイトであれば、その損失は想像以上に大きい可能性があります。

グーグル、アマゾン、ヤフーなどは、普段意識してないから当たり前のようになってしまってますけど、表示速度が驚くほど早いです。

一度、意識して他のサイトや自分のサイトと比べてみてください。すぐにわかると思います。

ウェブページの表示速度は、Pingdom Toolsで測定することができます。ページ全体のファイルサイズや表示速度だけでなく、各ファイルごとのサイズや表示速度もわかりますので、どのファイルが速度を低下させているのか、ということまで把握することができます。

ウェブページの表示速度を上げる方法は、いろいろありますが、比較的簡単でコストもかからずにできる方法があります。

それは、画像の表示にCSS Spritesというテクニックを使うことです。

CSS Spritesを使わずに、画像を配置するオーソドックスなやり方としては、１つ１つ画像をimgタグを使って配置していくことです。ただ、この方法の場合、使う画像の数が少なければ、それほど問題にならないのですが、数が増えてくると、１つ１つ画像を読み込まなければならないので時間がかかってしまいます。

ファイルサイズの大小というよりも、画像を読み込む回数が多くなって表示速度が落ちてしまうのです。

そこで、複数の画像を１つの画像にしてしまって、一度に全ての画像を読み込むようにするのです。そして、その１枚の画像から必要な部分だけをCSSでコントロールして表示させるのです。

これをすると、かなり大きめの画像が必要になるのですが、全体としては大量の小さな画像をたくさん使うよりも、ファイルサイズが少し小さくなります。また、ブラウザの画像を読み込む回数を極端に減らすことができるので、ページの表示速度が早くなるのです。

このCSS Spritesというテクニックは、ユーチューブ、アマゾン、ヤフーなどでも利用されているみたいです。英語で書かれていますが、SMASHING MAGAGINEというサイトで写真付きで分かりやすい解説がなされています。

ほんとに細かいことの積み重ねでWebサイトは、見違えるようによくなっていきますので、一度自分のWebサイトの表示速度改善に挑戦してみてください。

CSS Spriteについては、「ハイパフォーマンスWebサイト ―高速サイトを実現する14のルール」で解説されています。