タグ

ブックマーク / dankogai.livedoor.blog (29)

  • Algorithm - 連想配列の実装としてのハッシュはオワコン? : 404 Blog Not Found

    2012年01月17日11:45 カテゴリアルゴリズム百選Tips Algorithm - 連想配列の実装としてのハッシュはオワコン? 珠玉のプログラミング Jon Bentley / 小林健一郎訳 つまり「終わったコンテナ」。 以前からうすぼんやりと考えて来た危惧が、すこしはっきりと見えてきた。 徳丸浩の日記: Webアプリケーションに対する広範なDoS攻撃手法(hashdos)の影響と対策 もうそろそろハッシュ(テーブル)以外の手段の連想配列の実装手段を格的に模索するべきではないか、と。 そのデータ構造は、君の魂を差し出すに足るものかい? 連想配列(Associative array)がコレクション(Collection)、すなわち数多のデータ構造をまとめるデータ構造としての覇者となったのはもはや疑いようがない事実でしょう「配列で実装されるデータ構造ではなくて、配列を実装するデータ構

    Algorithm - 連想配列の実装としてのハッシュはオワコン? : 404 Blog Not Found
  • 紹介 - Software Design 2011年03月号/Web+DB Press Vol. 61 : 404 Blog Not Found

    2011年02月18日19:45 カテゴリSoftware DesignWEB+DB PRESS 紹介 - Software Design 2011年03月号/Web+DB Press Vol. 61 今月も Software Design が出る頃となりましたので紹介です。 Software Design 2011年03月号 電子版@fujisan.co.jp Software Design 2011年03月号|gihyo.jp … 技術評論社 今月の「思わぬ出会い」は、なんといっても第二特集の「いまさら聞けないGPSの基礎」。これ、「いまさら聞けない」ところか「いままで誰も聞こうとしなかった」レベルの、基礎中の基礎。この場合の基礎は数学に対する算数という意味ではなくて、数論という意味での基礎。 GPSがあるおかげで、今どこにいるのかを道路一分の精度でわかるということまではみんな知って

    紹介 - Software Design 2011年03月号/Web+DB Press Vol. 61 : 404 Blog Not Found
    hideoki
    hideoki 2011/02/18
  • #perl - $Config{usemymalloc} : 404 Blog Not Found

    2009年10月16日00:30 カテゴリLightweight Languages #perl - $Config{usemymalloc} それを返さないかは、その perl が受胎(conceive)したとき、平たく言えばどうConfigureされたかによって決まります。 Perl5 doesn't release SV's memory - SVアリーナのメモリ領域確保は一度おこなわれたら、「もう一生離さないぜ」な件 - TokuLog 改めB日記 Perl5 はメモリプールをもってる」ってのは、Perl Monger なら誰でもしってるわけですが、30MB とか領域確保したら、それはプールしないで、すぐ返すだろ JK とおもってたら、返してなかったので、それについて調べたときのメモ。perl がメモリーを返してくれるかどうかは、以下の簡単なscriptでチェックできます。 use

    #perl - $Config{usemymalloc} : 404 Blog Not Found
  • Ajax - perlを実行するAPI : 404 Blog Not Found

    2009年03月10日22:00 カテゴリLightweight Languages Ajax - perlを実行するAPI つくっちゃいました。 「404 Blog Not Found:Ajax - Lightweight Languages を実行するAPI」に置き換えられました。 まずはこれをご覧ください。 use strict; use warnings; use YAML::Syck; use Data::Dumper; my $n=1; print "DATA[",$n++,"]:$_" for <DATA>; print Dumper(\%INC); print YAML::Syck::Dump(\%INC); use Test::More 'no_plan'; is(1,1); is(1,0); __DATA__ use this instead of STDIN like

    Ajax - perlを実行するAPI : 404 Blog Not Found
  • PHP - 以外の言語でPHPのsortを実装してみる。 : 404 Blog Not Found

    2009年02月27日17:00 カテゴリLightweight Languages PHP - 以外の言語でPHPのsortを実装してみる。 案外笑い事じゃないかも。特にJavaScript! PHPのsort関数は相当おかしい - hnwの日記 なんと、同じ要素を持つ配列をソートした結果が異なっています。こちらはまだいい具合にわざとらしいけど.... Perl [Run via CodePad] #!/usr/local/bin/perl use strict; use warnings; eval { # try Scalar::Util::looks_like_number() require Scalar::Util; Scalar::Util->import('looks_like_number'); }; if ($@) { # use regexp if not avail

    PHP - 以外の言語でPHPのsortを実装してみる。 : 404 Blog Not Found
  • perl - HTMLをXMLとして扱う : 404 Blog Not Found

    2009年02月19日08:30 カテゴリLightweight Languages perl - HTMLをXMLとして扱う そのXML::Liberalが test でこけまくっていたところから旅が始まった。 ゆーすけべー日記: 壊れた Premiere (映像編集ソフト) のプロジェクトファイルが XML::Liberal (Perlモジュール) で直った ということは、なんとかして壊れたプロジェクトファイルを「well formed」な XML にすればいいじゃないのか!と思ったわけ。そこで活躍したのが「XML::Liberal」という miyagawa プロダクトな Perl モジュール。 やりたかったのは、XHTMLでないHTMLを、XML::*なモジュールで扱うこと。例えばXML::LibXMLを使えば、JavaScriptみたいな感覚でDOMを操作できるし、XML::Sim

    perl - HTMLをXMLとして扱う : 404 Blog Not Found
  • regexp - possessive quantifier (独占的|絶対最大)量指定子とは何か? : 404 Blog Not Found

    2009年02月16日22:30 カテゴリ書評/画評/品評 regexp - possessive quantifier (独占的|絶対最大)量指定子とは何か? 入門正規表現 岩谷宏 ちがうよ!バグじゃないよ! 404 Blog Not Found:perl - Encode-2.31 Released, 2.30 zapped, regexp bug in 5.10.0 ちょっと調べてみると.... % perl5.10.0 -le 'print "perl" =~ /^\w{1,8}+$/' 1 % perl5.8.8 -le 'print "perl" =~ /^\w{1,8}+$/' Nested quantifiers in regex; marked by <-- HERE in m/^\w{1,8}+ <-- HERE $/ at -e line 1. というわけで、Perl

    regexp - possessive quantifier (独占的|絶対最大)量指定子とは何か? : 404 Blog Not Found
  • $job->done('well'); # 書評 - モダンPerl入門 : 404 Blog Not Found

    2009年02月09日00:00 カテゴリ書評/画評/品評Lightweight Languages $job->done('well'); # 書評 - モダンPerl入門 翔泳社再帰、じゃなかった斎木様より献御礼。 モダンPerl入門 牧大輔 初出2009.02.03; 発売開始まで更新 モダンPerl入門とどいた - D-6 [相変わらず根無し]「モダンPerl入門」が届きました。翔泳社様、ありがとうございます>< うちにも届いたので早速拝見。 これほどの出来だとは! DMAKI++ あ…ありのまま 今 読んだ事を話すぜ! 書「モダンPerl入門」を一言で言うと、「Perl Cookbook」と「Perl Best Practice」と「Advanced Perl Programming」と「ミニマルPerl」のエッセンスを取り出し、そしてそれを最新の「モード」へと昇華した一冊。

    $job->done('well'); # 書評 - モダンPerl入門 : 404 Blog Not Found
  • 惰訳 - Barack Obama Inauguration Speech in Full : 404 Blog Not Found

    2009年01月21日06:00 カテゴリ 惰訳 - Barack Obama Inauguration Speech in Full 「惰訳 - Barack Obama's acceptance speech in full」に引き続き。 今回は、 ABC News: FULL TRANSCRIPT: President Barack Obama's Inaugural Address オバマ大統領就任演説:全文(1) - 毎日jp(毎日新聞) と勝利宣言の時よりも全文原稿が早く出回ったようで、相変わらず左目も見えない状態でリンクのみでお茶を濁そうかとも思ったのですが、毎日.jpの全文翻訳が翻訳というより通訳だったのでちょっと手を入れるつもりが全文訳し起こしていました。 それでは、以下のとおり。 Dan the Translator My fellow citizens: 市民の皆さん

    惰訳 - Barack Obama Inauguration Speech in Full : 404 Blog Not Found
  • perl - no accessor; # だって遅いんだもん : 404 Blog Not Found

    2008年07月08日15:30 カテゴリLightweight Languages perl - no accessor; # だって遅いんだもん まずはDCONWAY先生のお言葉から。 Perl Best Practices Damian Conway [邦訳:Perlベストプラクティス] Always use fully encapsulated objects. オブジェクトは常にカプセル化して用いよ これはperlの常識というより、OOの常識であるのだけど、これがperlの実装と重なることにより、perlにおいては他の言語よりも作法を破りたくなるインセンティヴが大きいのは否めない。 カプセル化のコストが、あまりに大きいのだ。 以下は、ハッシュ、ハッシュリファレンス、そしてハッシュリファレンスによるオブジェクトの性能をベンチマークしたものだ。最初が初期化、次が accessor と

    perl - no accessor; # だって遅いんだもん : 404 Blog Not Found
  • SMTP - SPF導入のすすめ : 404 Blog Not Found

    2007年04月15日12:00 カテゴリiTech SMTP - SPF導入のすすめ NNIPFの話題も出たので、SPFについても書く事にします。 SPFって何? Weblioはこう答えてくれました。 SPF とは (Sender Policy Framework) エスピーエフ, えすぴーえふ SPFとは、電子メールの送信元ドメインを認証する方式のひとつである。SMTPの拡張仕様であり、RFC 4408として定義されている。 ここまでの説明は合ってます。が、以下の下りは完璧に間違っています。 SPFでは、あるドメインに対して電子メールを送ることのできるアドレスを、メールサーバーの側であらかじめ送信者のIPアドレスとして管理している。管理よって認証されたアドレスがメールサーバーの保有している情報と整合した場合に限り、そのメールが正当なものとして送信される。 詳しくはRFC 4408または

    SMTP - SPF導入のすすめ : 404 Blog Not Found
  • perl - PerlIO vs. <> : 404 Blog Not Found

    2007年02月08日03:00 カテゴリLightweight Languages perl - PerlIO vs. <> これ、Perl 5 Porterとしてちょっと申し訳ないケース。 [を] Perl 標準入力と utf8 しかし、 test.pl < utf8.txt は行けるが、 test.pl utf8.txt はだめ。ここで問題になっているのは、<>でファイルを指定した場合も標準入力の場合のどちらの場合もPerlIO Layerを指定する方法。 先に答を書いてしまうと、 use open ':utf8'; binmode STDIN, ':utf8'; binmode STDOUT, ':utf8'; ということになる。 odz buffer - それ use open とりあえず use open IN => ':utf8'; とするほうが、スマートといえばスマートか?

    perl - PerlIO vs. <> : 404 Blog Not Found
  • 404 Blog Not Found:perl & Unicode - その字の名前

    2006年11月20日23:00 カテゴリLogos一日一行野郎 perl & Unicode - その字の名前 Unicodeの隠れた功績として、こうした「何て呼べばいいの?」という文字に(はんば無理矢理)名前をつけてくれたこともあります。 例えば、 新方言時代〜「小さい“お”」って何? 「々」はなんていえばいいのだろうか? には 々 U+3005 IDEOGRAPHIC ITERATION MARK といった具合に。 この手の調査は、Perl5.8以降が手元にあると簡単に出来ます。 例えば、 perl -Mencoding=utf8 -MHTML::Entities -Mcharnames=:full -ple \ '$o=ord; $_=sprintf"$_ U+%04X %s", $o, charnames::viacode($o)' で、こんな具合にコードポイントとUnicode

    404 Blog Not Found:perl & Unicode - その字の名前
  • 勝手に翻訳 - Googleの十戒 : 404 Blog Not Found

    2006年10月11日21:15 カテゴリBlogosphere 勝手に翻訳 - Googleの十戒 面白かったので勝手に翻訳してみた。 秋元@サイボウズラボ・プログラマー・ブログ: 新興宗教Google教 カナダの20代の若者が、大学在学中にレポートを書くのにGoogle検索がたいへん役に立ち、「優」を取れたことに啓示を受けて(笑)はじめたらしい。 家 The 10 Commandments of Google - The Church Of Google . Org 元祖 モーセの十戒 - Wikipedia 玉川平安教会のページ 汝、わが顔の前に、我のほか何物をも検索とすべからず。YahooもLycosもAltaVistaもMetacrawlerも邪神なり。 汝、己れのために、何の無広告検索を作るべからず。また上は天にあるもの、下は地にあるもの、ならびに地の下の水のなかにあるものの

    勝手に翻訳 - Googleの十戒 : 404 Blog Not Found
  • 善意の値段 : 404 Blog Not Found

    2006年10月10日16:30 カテゴリMoney 善意の値段 内に外にどたばたしているうちにもう旬が過ぎてしまった感もあるのだけど、この問題に旬などないはずなので。 livedoor ニュース - 心臓病女児募金活動に ネット上で批判噴出 心臓病に侵された女の子への救済募金をめぐって、2ちゃんねるなどの掲示版が「祭り」状態になっている。手術などに必要な1億3,600億円を目標に、両親と有志が募金活動を始めたが、両親がNHKに勤務していることなどを理由に「高給取りなのに何故自腹を切らないのか」といった批判が噴出したのだ。矛先は他の募金活動にも向けられ、募金という活動そのものの透明性に疑いの目が向けられている。まず、右肩のグラフの説明から。 これはblogでも以前使ったことのある第19回 生命表から、日男女10万人がどの時点でどれだけ生きていて(グラフ左軸)、どれだけ死ぬか(グラフ右

    善意の値段 : 404 Blog Not Found
  • perl - 勝手に添削 - Storable : 404 Blog Not Found

    2006年05月11日13:45 カテゴリLightweight Languages perl - 勝手に添削 - Storable というわけで、ひさかたぶりの勝手に添削のコーナーです。今回は、Storableに関して。 [を] Perl の Storable モジュールのメモ store [ $first->{uhyo}, $first->{hogera} ], "a.dat"; codingそのものに問題はありませんが、damianにも載っていないbest practiceをここで一つ紹介しましょう。 Always use nstore and nfreeze instead of store and freeze. 常にnstoreとnfreezeを使う事。storeとfreezeではなく。 理由は、その方がずっとつぶしが利くからです。頭にnをつけるだけで、platform依存が

    perl - 勝手に添削 - Storable : 404 Blog Not Found
  • 理解を求めるな、報酬を求めよ : 404 Blog Not Found

    2006年05月11日11:50 カテゴリMoneyPsychoengineering 理解を求めるな、報酬を求めよ あえて言おう。 だからこそ、報酬と待遇を求めよ、と。 業務連絡。その3|渋谷ではたらく社長のblog 「一番は技術者の頭数が明らかに不足していることです」 仙石浩明CTO の日記: IT企業には技術者と経営者の両方と話せるバイリンガルが必要優秀な技術者であればあるほど、 「人月」という考え方には反発するものだし、 優秀な技術者は、 平凡な技術者の何倍、いや何十倍のパフォーマンスを発揮できる (私は技術者の生産性は、ピンとキリでは 3桁の違いがあると常々主張してるのですが) わけで、 「頭数」なんかで数えられたらたまらない、 というのが、優秀な技術者の感覚だと思います。理解と心のよりどころが欲しかったら、今ならそういう場はいくらでもある。別に職場にそれがある必要はない。そして

    理解を求めるな、報酬を求めよ : 404 Blog Not Found
  • Paved by Roger Penrose - 書評 - The Road to Reality : 404 Blog Not Found

    2006年04月18日14:30 カテゴリ書評/画評/品評Math Paved by Roger Penrose - 書評 - The Road to Reality いやあ、脱帽。 The Road to Reality Roger Penrose これはすごいだ。まだ邦訳はないみたいだけど、オイラーの贈り物を気に入った人ならすぐ注文すべきだ。大丈夫。高校修了の数学力と英語力でちゃんと読み通せるから。騙されたと思って←をポチッとクリックするあるよ。 書は、理論物理学の第一人者であるRoger Penroseによる、一般ピープル向けの物理および数学の教科書だ。そう。当に真剣に一般ピープル向け。 The Emperor's New Mindを呼んだ人は、かえって身構えてしまうかも知れない。私もそうだった。ましてや、書は1000ページを超える大著である。ところが、ページをたぐって見ると

    Paved by Roger Penrose - 書評 - The Road to Reality : 404 Blog Not Found
  • pageoneへの提言 : 404 Blog Not Found

    2006年04月18日11:32 カテゴリBlogosphere pageoneへの提言 TBは滑ってしまったけれども、Mailへの返事がなされており、また運営者からも弁明がなされているので、各位におかれてはまずはpageoneに向けた矛先をおさめていただきたい。 404 Blog Not Found:pageoneに悪意はあるか? entryはそのpageoneの運営者のblogにもTBするので、pageoneの運営者におかれては是非そのあたりをきちんと弁明してほしい。その上で、pageoneに提言。 自分が何者かを常に明らかにしておく SPAMMERが嫌われる理由は、単に迷惑な行為をしているからだけではない。彼らは自らが何者かを明らかにせず、それゆえ「迷惑はやめて欲しい」という苦情を被害者が申し立てる事が不可能だからだ。 pageoneに関しては、blogという形で自己言及はされてい

    pageoneへの提言 : 404 Blog Not Found
    hideoki
    hideoki 2006/04/18
    NDOメソッドは育てゲーだったのか
  • たらいを回すならHaskell : 404 Blog Not Found

    2006年04月07日22:09 カテゴリLightweight Languages たらいを回すならHaskell たらい回し関数、またはtakと呼ばれる有名な関数が存在する。 C言語による最新アルゴリズム事典 奥村晴彦 同書をお持ちの方は、185ページに乗っている。 実はこれ、Haskellの売り込みには最高の関数なのだ。 ちなみに、これ最後にyを返すバージョンとzを返すバージョンがあるようで、それぞれtakyとtakzと呼ばれている模様。ここではtakyの方を採用。 まずは、私のnative tongueとも言えるperl。 tak.pl #!/usr/bin/perl use strict; use warnings; sub tak{ my ($x, $y, $z) = @_; ($x <= $y) ? $y : tak(tak($x-1, $y, $z), tak($y-1,

    たらいを回すならHaskell : 404 Blog Not Found