タグ

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

  • perl - EncodeでXSSを防ぐ : 404 Blog Not Found

    2009年03月03日19:00 カテゴリLightweight Languages perl - EncodeでXSSを防ぐ 良記事。 第7回■文字エンコーディングが生み出すぜい弱性を知る:ITpro だけど、問題点のみ具体例があって、対策にないのが片手落ちに感じられたので、その点を補足。 結論だけ言ってしまえば、Perlなら以下の原則を守るだけです。 404 Blog Not Found:perl - Encode 入門 すでにOSCONでもYAPCでも、あちこちそちこちでこの基方針に関しては話したのですが、ここ 404 Blog Not Found でも改めて。 Perl で utf8 化けしたときにどうしたらいいか - TokuLog 改め だまってコードを書けよハゲ入り口で decode して、内部ではすべて flagged utf8 で扱い、出口で encode する。これが

    perl - EncodeでXSSを防ぐ : 404 Blog Not Found
  • もはや入門書というよりバイブル - 書評 - 初めてのPython 第3版 : 404 Blog Not Found

    2009年03月01日23:00 カテゴリ書評/画評/品評Lightweight Languages もはや入門書というよりバイブル - 書評 - 初めてのPython 第3版 オライリー矢野様より献御礼。 初めてのPython 第3版 Mark Lutz / 夏目大訳 [原著:Learning Python (3rd Ed.)] 私のような Occasional Pythonistas には、これまで書かれた最良の Python 。 だけど、初心者向けのとしては、どうなのだろう。 書「初めてのPython 第三版」は、タイトルどおり、プログラミング言語Pythonの初心者向けのであり、そしてオライリーという出版社がだしているだけあって、その決定版であることを運命づけられた一冊。 Book:初めてのPython 第3版より はじめに I部 Pythonの基礎知識 1章 Pytho

    もはや入門書というよりバイブル - 書評 - 初めてのPython 第3版 : 404 Blog Not Found
    abyssgate
    abyssgate 2009/03/03
    800P以上とな
  • 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
  • ハコモノ行政はもうたくさん、でもヤネモノ行政はいけそう : 404 Blog Not Found

    2009年02月18日02:30 カテゴリSciTechTaxpayer ハコモノ行政はもうたくさん、でもヤネモノ行政はいけそう わかってないなあ。 痛いニュース(ノ∀`):勝谷氏の「20兆円で日中の住宅にソーラーパネルを設置」案、民主党が採用へ? どっちも。 太陽光発電の現状に関しては、Wikipediaがむちゃくちゃ詳しい。 新・太陽電池を使いこなす 桑野幸徳 太陽光発電 - Wikipedia 太陽光発電の環境性能 - Wikipedia 太陽光発電の資源量 - Wikipedia 太陽光発電のコスト - Wikipedia 一般書では「新・太陽電池を使いこなす」がやはり一番のお勧めなのだけど、初版が1999年で、さすがに手に入りにくくなっているので、まずは上の記事を読んで欲しい。 で、ねらーとはてな村民の多くがしている誤解をまず解く。 「原発作れよ、原発」 私も一技術者として、実

    ハコモノ行政はもうたくさん、でもヤネモノ行政はいけそう : 404 Blog Not Found
  • まさかここまでひどいとは - 書評 - 子どもの貧困 : 404 Blog Not Found

    2009年02月12日03:00 カテゴリ書評/画評/品評Taxpayer まさかここまでひどいとは - 書評 - 子どもの貧困 二児の父として、このことは知っているつもりだった。 子どもの貧困 阿部彩 関連entriesも少なくない。 site:http://blog.livedoor.jp/dankogai/ 子供 - Google 検索 404 Blog Not Found:貧乏な社会で子を産むな 404 Blog Not Found:書評 - 若者をい物にし続ける社会 なのに、いかに知らなかったかを改めて思い知らされた。 かつて親だった人も、すでに親になった人も、これから親になる人も、必読。 難しいではないので、高校生以上の未成年も、読んでおくべき。 書「子どもの貧困」は、日の子どもの貧困がいかにひどいかを、情ではなく理で説いた渾身の一冊。 はじめに iv 「子どもの貧困

    まさかここまでひどいとは - 書評 - 子どもの貧困 : 404 Blog Not Found
  • perl - open my $fh, "comand |"; # はモダンじゃない : 404 Blog Not Found

    2009年02月10日01:00 カテゴリLightweight Languages perl - open my $fh, "comand |"; # はモダンじゃない モダンPerl入門 牧大輔 「モダンPerl入門」発売記念ということで、同書を補足するentryを。 同書でちょっと残念だったのが、[5.2 外部コマンドの実行]。あまりモダンではないのだ。 P. 141 system("/sbin/wget", "http://example.com"); これはいいのだが、以下がちょっとまずい。 my $output = `/bin/ls tmp`; open(my $fh, '| cat -v'); これ、何がまずいか、というと、コマンド実行の際に/bin/shを使ってしまうのだ。そのおかげでcommand < from > to 2&>1のようなリダイレクトも使えるなどの利点もあ

    perl - open my $fh, "comand |"; # はモダンじゃない : 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
  • アルゴリズム - 同じ文字列のn回繰り返しをlog n回で作る方法 : 404 Blog Not Found

    2009年01月31日01:00 カテゴリLightweight LanguagesMath アルゴリズム - 同じ文字列のn回繰り返しをlog n回で作る方法 これなのですが.... 同じ文字列のn回繰り返しを作る最速の方法を探求してみた - muddy brown thang ちょっとした事情により、ある文字列のn回繰り返しを作る関数 (PHPでいうところのarray_repeat(), Perlで言うところの「"..." x n」、RubyPythonで言うところの「"..." * n」) を高速に実装しなければならない状況に遭遇したのでベンチマークをとってみたところ、その結果がとても新鮮で驚いたので、これを共有しつつもダメ出ししてもらえないかなーと思って晒してみることに。 なぜかもっとシンプルな奴がなかったので。 以下、比較。初期値はIEにあわせてあります。Firefox/Saf

    アルゴリズム - 同じ文字列のn回繰り返しをlog n回で作る方法 : 404 Blog Not Found
  • 「タダで働きます!」? 30年または$300万早いわ雑魚 : 404 Blog Not Found

    2008年12月14日06:30 カテゴリValue 2.0 「タダで働きます!」? 30年または$300万早いわ雑魚 1 entry分ただ働きしてやるか。 糞学生はザマー。こんな人材はいらない。|web2.0 (^O^)v だから当然、その業界が好きなら、 タダで働きます! と言えばよいだけ。 糞ならまだ土になるが、産業廃棄物だな、このblog主。 学生になんでただ働きさせられないか。 決まってる。ただ働きってのは最高の贅沢だからだ。 Steve Jobs がなぜ年俸$1でAppleCEOを引き受けているか。 すでに Billionaire だからだ。 これくらい資産があると、下手な給料より、資産の方がずっと稼ぐ。Jobsの場合、 404 Blog Not Found:Monsters' Inc., Really. DISの時価総額がほぼ500億ドルなのでざっくり7.4%といったところ

    「タダで働きます!」? 30年または$300万早いわ雑魚 : 404 Blog Not Found
  • Perl - "Higher Order Perl" が無料ダウンロード可能に : 404 Blog Not Found

    2008年12月10日12:30 カテゴリ書評/画評/品評Lightweight Languages Perl - "Higher Order Perl" が無料ダウンロード可能に はてぶ経由で知ったのだけど、すごい。 Higher Order Perl Mark Jason Dominus Higher-Order Perl これ、Perl Mongesだけではなく Rubyists にも Pythonistas にも JavaScripters にも、いわゆる高階関数が使えるプログラミング言語のユーザーすべてにお勧めです。高階関数が単に面白いだけではなく、非常に役に立つこともわかります。 PDF版をダウンロードしたのですが、特にありがたいのは、テキスト、すなわちコードもコピペ可能なこと。検索と引用はのアキレス腱なので。 その一方で、600ページ近いこの大著を通読するのは、紙の方が向い

    Perl - "Higher Order Perl" が無料ダウンロード可能に : 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
  • perl - デフォルト値のperlらしい指定法 : 404 Blog Not Found

    2008年07月02日23:00 カテゴリLightweight Languages perl - デフォルト値のperlらしい指定法 Perl Cookbook (English) Christiansen / Torkington [邦訳: Perlクックブック] これでもよいのだけど、さらに恰好つけるとよりperlらしくなるので。 デフォルト値の扱い。 - サンプルコードによる Perl 入門 Scalarによるデフォルト値 sub num{ my $num = shift; # .... } ここは sub num{ my $num = shift || -1; # .... } の方がわかりやすい。0または''を入力値、すなわち非デフォルト値として扱いたい場合のみ、 sub num{ my $num = shift; $num = -1 if not defined $num;

    perl - デフォルト値のperlらしい指定法 : 404 Blog Not Found
  • $this->get if $you->learn(slow) - 書評 - すぐわかるオブジェクト指向Perl : 404 Blog Not Found

    2008年06月20日01:00 カテゴリ書評/画評/品評Lightweight Languages $this->get if $you->learn(slow) - 書評 - すぐわかるオブジェクト指向Perl 著者より献御礼。 すぐわかるオブジェクト指向Perl 深沢千尋 「すぐわかる」のタイトルに反して、「すぐにわからない人が、すぐではなくあくまで自分のペースでゆっくり学ぶ」のに向いた良書。ウサギタイプではなく、カメタイプの人が Perl を学ぶのであれば、書が第一選択肢となるべきだ。 書「すぐわかるオブジェクト指向Perl」を著者が著したのは、リャマおよびアルパカでは学べなかった読者がいるからだと著者は言う。 添え状より Danさんはブログに「Perlを学ぶ最短ルートはリャマとアルパカを読むこと」と書かれています。同感ですが、ぼくの同僚などはリャマを読ませても飽き

    $this->get if $you->learn(slow) - 書評 - すぐわかるオブジェクト指向Perl : 404 Blog Not Found
  • perl - use warnings; # -w でなくて : 404 Blog Not Found

    2008年06月19日21:45 カテゴリLightweight Languages perl - use warnings; # -w でなくて 最近は、さすがにuse strict;されていない実践コードを目にすることもほとんどなくなってきたのだけど、まだ残っているのがuse warnings;利用。以下と併せて読んでいただけると幸いだ。 404 Blog Not Found:perl - use strict; # and be happy -w って何? warnings って何? まず、以下のプログラムを見てみよう。 #!/usr/local/bin/perl use strict; sub distance { my ( $a, $b ) = @_; return sqrt( $a**2 + $b**2 ); } print distance(@ARGV), "\n"; % p

    perl - use warnings; # -w でなくて : 404 Blog Not Found
  • 404 Blog Not Found:perl - There's more than one way to die

    2008年05月10日15:00 カテゴリLightweight Languages perl - There's more than one way to die いよいよ来週はYAPC::Asia::2008ですが、Hotel DANは日から開業。我が家では日から20日までが「YAPC旬間」です。 というわけで、その間は少なくとも一つはperlがらみのentryにしていく所存です。 で、第一回はいきなりdieの話題です。 開発日誌 pp-perl: Perlのエラー処理プログラムを停止して、メッセージ(LIST)をSTRERRに出力します。 間違っていませんが正しいとは言えません。 die = throw die()とは何か? まずは、以下のコードをご覧下さい。 [Run via codepad] eval { my $zero = 0; my $dead = 1 / $zero;

    404 Blog Not Found:perl - There's more than one way to die
  • perl - Encode 中級 : 404 Blog Not Found

    2008年05月08日04:00 カテゴリLightweight Languages perl - Encode 中級 以前書いた 404 Blog Not Found:perl - Encode 入門 は大好評でしたが、 ウェブで利用される文字コード、UnicodeがASCIIを上回る--グーグルが明らかに:マーケティング - CNET Japan UnicodeがASCIIを追い越し、World Wide Web上で最も多く利用されている文字コード体系になったとGoogleのシニアインターナショナルソフトウェアアーキテクトMark Davis氏がブログで述べている。 という時代に完全対応するには、入門以上の知識がちょっと必要になります。 例えば、blogをホストしてくれているlivedoor blogの文字コードはEUC-JP。「時代はUnicode」だと言っても、こうした事情もまだ

    perl - Encode 中級 : 404 Blog Not Found
  • 404 Blog Not Found:perl - ワンライナーの書き方入門

    2008年03月30日19:45 カテゴリLightweight Languages一日一行野郎 perl - ワンライナーの書き方入門 まあ、ruby のコマンドラインオプションって、Perl由来ですから。 Rubyでワンライナーを書く方法のまとめ まぁ、Perlもあるしあんまり需要が無いのかも知れませんが。 というわけで、Rubyistにも役立つPerlのワンライナー入門です。 基中の基 コマンドとしてのperlは、スイッチがない場合、引数はスクリプト名として扱われます。 % cat hello.pl print "Hello, world!\n"; % perl hello.pl Hello, world! % コマンドライン中の文字列をスクリプトとして解釈させるには、-eを使います。 % perl -e 'print "Hello, World!\n"' Hello, worl

    404 Blog Not Found:perl - ワンライナーの書き方入門
  • 「同じコード」の同じって何さ - TAPのススメ : 404 Blog Not Found

    2008年03月27日03:00 カテゴリArtLightweight Languages 「同じコード」の同じって何さ - TAPのススメ 問題は、この「同じコード」の定義。 「誰が書いても同じコード」は大事なことなのか - ひがやすを blog でも、「誰が書いても同じコード」にするってのは、そもそも無理だと思うんだよね。そうやって、わざわざドキュメントをたくさん書かせても、めためたなコードを書くやつはいて、総合テストするときに、現場は燃え上がるもの。ある程度の規模以上のプロジェクトなら、どこでもそんな感じじゃないかと思います。同じ「書き方」をしなければならないのか? 結果が「同じ」ならいいのか? もし後者だとしたら、実は 重要なのは、「誰でもメンテナンスできるコード」にすること。そのために、コーディング規約は、きちんと決めてみんなで守る、それ以上は、がちがちに縛る必要はない。 すら必

    「同じコード」の同じって何さ - TAPのススメ : 404 Blog Not Found
  • アニメ評 - 「超時空要塞マクロス」をもっと評価すべき : 404 Blog Not Found

    2008年02月27日01:00 カテゴリ書評/画評/品評 アニメ評 - 「超時空要塞マクロス」をもっと評価すべき マクロスかわいいよマクロス 超時空要塞マクロス 愛・おぼえていますか レジデント初期研修用資料: 量産型はダテじゃない「ガンダム」とか「宇宙戦艦ヤマト」みたいなプロトタイプには、当は勝たせちゃいけないんだと思う。 全人類の期待を一身に背負ったプロトタイプは、性能が劣った敵側の量産品に 囲まれて、そのうち故障が頻発して、部品が足りなくなって、結局人類滅亡するのが正しいはず。今考えてもこの先進性はすごい。箇条書きにしてみただけで マクロスは人類にとっては宇宙からの超技術を駆使したプロトタイプ。でも監察軍(TV版)/メルトランディ(映画版)の量産型をサルベージしたセコハン。 それが人類の意図に反して、自動でゼントラーディの斥候をあぼ〜んしたのが宇宙戦争のはじまり。 敵味方含め、マ

    アニメ評 - 「超時空要塞マクロス」をもっと評価すべき : 404 Blog Not Found
  • 404 Blog Not Found:perl - utf8::is_utf8("\x{ff}") == 0

    2008年02月18日10:00 カテゴリLightweight Languages perl - utf8::is_utf8("\x{ff}") == 0 ちょうどいい機会なので、Perl 5.8以降におけるutf8フラグの立ち方を。 unknownplace.org - 2008/02/17 - utf8::is_utf8 ということで、"\x{6751}\x{702c}\x{5927}\x{8f14}" などというData::Dumper表記でかならずしも utf-8フラグがたつわけじゃない。ということがいいたかったんだと思うのだけれど、 \x{UUUUUU}とutf8 flag まずはクイズです。以下がどう出力されるかを答えなさい。 sub pfrag{ print utf8::is_utf8($_[0]) ? 1 : 0, "\n" } pfrag "Hell\xC3, worl

    404 Blog Not Found:perl - utf8::is_utf8("\x{ff}") == 0