DBIx::Class を少し使ったことがあったので Class::C3 をなんとなくで理解していたんです。（ふーん幅優先版の NEXT モジュールでしょ？みたいな感じで。） でも、これは絶対にちゃんと細かい挙動まで勉強しといたほうがいいと思いました。 多重継承とか mixin とかに強くなりたいなと C3 C3 というのは Python 2.3 のドキュメントに書いてある MRO(Method Resolution Order 多重継承したときにどんな感じでメソッドを探索するかという順番) を決めるアルゴリズムで。Algorithm::C3 っていうのがそのアルゴリズムの Perl 実装なんです。 それに！ Parrot でも使えるみたいだし！ ちなみに MRO ってこんな感じね A には add というメソッドがある B にも add というメソッドがある C は A と B を多重継

はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28

はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28

はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28

use Smart::Comments とかいちいちかかないでも Toolkit に P.pm なり Smart::Comments なりも含めて ソース中にuse Smart::Commentsは書かなくていいんじゃないかなあと思います。 use Smart::Commentsを消したり、no Smart::Commentsに変えたりするよりも、 デバッグ中だけperl -MSmart::Commentsするとか、PerlSwitches -MSmart::Commentsにしておくとかすれば、 環境によるソースの修正（それが自動で行なわれるとしても）が不要になっていいんじゃないかと思ったり。 とか書いていたらid:miyagawaさんからトラックバックいただきました。 Smart::Comments はソースフィルタだから use したコンテキストでしかフィルタがきかない。というわけで

当たり前ですけどInnoDBの話です。 ちなみにMySQL4.1xで試したので、それ以上ならばきっと出来ると思います。 下記のようにfooって言うdatabaseにaテーブルを作る。 create database foo; create table foo.a ( id int primary key, name text ) TYPE = InnoDB; create database bar; create table bar.b ( id int primary key, a_id int not null, name text, foreign key(a_id) references foo.a(id) ) TYPE = InnoDB;こんな感じでとりあえずtableは作れます。 insert into foo.a(id, name) values(1, 'a'); inser

不思議とアプリケーションチューニングに置いて、余り語られていないINDEX化ですが、 意外ときちんと調べて見ると色んな機能があるんだなと再認識させられます。 複合INDEX 例えば複合INDEXなんかですが、 多くのプログラマが勘違いしていたりとか、あるいは適切に張る努力を怠っていたりしませんかね。 テーブルに複合インデックスがある場合、オプティマイザではインデックスの左端の先頭部分のいずれかをレコードの検索に使用できます。 たとえば、(col1, col2, col3)に3カラムのインデックスがある場合、(col1)、(col1, col2)、および (col1, col2, col3) に対して、インデックスの検索機能を使用できます。 上記の引用でもあるように、(col1), (col1, col2), (col1, col2, col3)のいずれかの組み合わせがANDで指定されている

d:id:ZIGOROu:20061006:1160166429からの続き とりあえず書き終えました。 Catalyst->import Catalyst->setup_home MyApp->config MyApp->setup MyApp->setup_home MyApp->setup_log MyApp->setup_plugins MyApp->setup_dispatcher MyApp->setup_engine MyApp->setup_flags (あれば) MyApp->plugins->setup MyApp->setup_components MyApp->setup_actions setupメソッドから呼び出している各種setup_*なメソッドに関してまだ見てないので、 さらに追ってみましょう。 追記 component辺りを少し修正。 MyApp->setu

はじめに 遅ればせながらじっくりCatalystのsourceを読んでみようかと思ったので、 備忘録を兼ねてシリーズ化してみます。 ちなみにソースコードはCatalyst::Runtimeの5.7003を見てます。 まずbootstrapとなるscript(project_server.pl)から見れば当然、Catalyst.pmを継承したクラスが基点となってるのは明らかなので、ここから読んでみます。 ここでは、 $ catalyst.pl MyAppでプロジェクトを作った物だとします。 まず出来上がったMyApp.pmを見てみます。 Catalyst->import use Catalyst qw/-Debug ConfigLoader Static::Simple/; our $VERSION = '0.01'; # # Configure the application # __PA

意外と知られてないのかもしれないので書いてみる。というか竹迫さんのパワポに書いてるまんまなんだけど、XML::Parser のソースに以下のパッチを当てるのみ。 --- XML-Parser-2.34-orig/Expat/Expat.xs Mon Jul 28 23:41:10 2003 +++ XML-Parser-2.34/Expat/Expat.xs Fri Aug 27 08:36:39 2004 @@ -17,6 +17,8 @@ #undef convert +#undef SvUTF8_on + #include "patchlevel.h" #include "encoding.h"するとあら不思議、XML::Parser で utf8 フラグが立たなくなります。ということは XML::RSS でもまた然り(XML::RSS の中では XML::Parser で pars

2005年09月24日21:11 カテゴリLightweight Languages Object::Apply にぽたん、お見事。 UTF-8 フラグと戦う人へ 〜Storable の bugfix なんか待ってられない編 - にぽたん研究所 ちとモジュール名が長すぎてタイプ量が多いのがアレですが。。。しかし、それでもまだLazynessが足りないと思い、こんなんの作ってみました。15分ハッキング。 package Object::Apply; use 5.008001; use strict; use warnings; use Carp; use Scalar::Util qw(blessed); our $VERSION = sprintf "%d.%02d", q$Revision: 0.1 $ =~ /(\d+)/g; sub new{ my $class = shift; m

はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28

keepalivedの設定ファイルは、以下のようなエントリをひたすら並べなくてはいけないので、規模が大きくなるほど可読性が落ちます。 virtual_server_group SITE1 { a.b.c.d 80 } virtual_server group SITE1 { delay_loop 3 lb_algo wlc lb_kind DR nat_mask 255.255.252.0 protocol TCP persistence_timeout 0 real_server 192.168.8.1 80 { weight 1 inhibit_on_failure HTTP_GET { url { path /s/health.jsp status_code 200 } connect_port 80 connect_timeout 5 nb_get_retry 1 delay_be

ドットインストール代表のライフハックブログ

ってかglobがあったか。すっかりその存在を忘れていた罠。 use strict; use warnings; use FindBin; use lib glob($FindBin::Bin . '/../../*/lib');多分こんな感じで動くと思われる。

はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28

はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28

Catalyst のソースを読んでいると Class::Data::Accessor と Class:Data::Inheritable が出てくる。つかわれかたは、ほとんど同じに見えるので、ちょっとソースを読んでみた。 読んでみると Class::Data::Accessor のほうは、オブジェクトメソッドとして呼ばれたときに、オブジェクトのデータにアクセスする。 こんな感じ。 use strict; use warnings; use base qw/Class::Data::Accessor Class::Data::Inheritable/; main->mk_classaccessor('hoge'); # Class::Data::Accessor main->mk_classdata('fuga'); # Class::Data::Inheritable main->hoge

JavaScript では apply や call を使って this を実行時に与えることが出来る var func = function() { return 1 + this }; alert(func.apply(1)); // 2 Perl では こうすると、this っぽい感じで与えられる my $code = sub { 1 + shift }; print 1->$code; # 2Algorithm::C3 のソースを読んでて出てきた。 めもめも まあ これで全然いいんですが、 my $code = sub {1 + shift }; print $code->(1); 文字列 or CodeRef が来るような場合は便利かもね $obj->$code # $code is code(or simbolic) referenceみたいな めもめも

SEO fundamentals Introduction Search Essentials SEO Starter Guide How Google Search Works Do you need an SEO? Crawling and indexing Sitemaps robots.txt Meta tags Crawler management Removals Canonicalization Redirects JavaScript SEO Ranking and search appearance Visual Elements gallery Title links Snippets Images Videos Structured data Favicons Site-specific guides Ecommerce International and multi

はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28

先日 PerlでCSSセレクタ で HTML::Selector::XPath がいい感じであると思ったわけですが、CSS セレクタだけじゃなく何気に HTML::TreeBuilder::XPath とのコンボがすげーイイ!ということにいまさら気づきました。 HTML::TreeBuilder::XPath で findnodes するとツリー状に連なった HTML::Element なデータ構造が返ってくるんですが、HTML::Element は API をかなりいろいろ持ってて、これをうまく使ってやるとスクレイピングを自然な感じで書けます。 例えばはてなダイアリーの任意のページから、本文部分だけをスクレイピングしたいと思ったときにキーワードリンクが邪魔だったりするわけですが、とりあえず HTML::Selector::XPath で div.section をぶっこ抜いて取れた HT