トラックバック拒否リストに1件追加。こないだもトラバスパム送ってきてたドメイン。1回は見逃すけど、次は許さない。

\s+と[\s]+の違いのせいでちょっとはまったりしたけれど、なんとかいい感じに動作してくれてる。 なに書いてるんだばかー。ちがうよちがうよぜんぜんちがうよ。s/.+$//;とs/.+$//s;の違いですよ＞＜

何だろうと思ったら、眠剤を飲み忘れてるだけでした。本に夢中になってついうっかり。たまにあるんだよね、こういうこと。周りが見えなくなるタイプ。

いつのまにかそれPlaしてるblogも20件。情報に対してだんだん貪欲になってきてる感じ。

鏡が見当たらなくて部屋中探したら、枕の下から出てきました。どうしてこんなところに入ってたんだろう？

EFTで切り出す範囲を指定するのはXPathのほうがはるかに簡単だけど、正規表現で書いたほうがやっぱり軽いよなぁ。あと、まいじゃーのところは書いてみたけどすごく汚い。XPathで切り出して、不要な部分をextract_after_hookで削除してる。パターンがよく分か…

少しずつPlaggerで読むサイトを増やし中。それはそうと、Plagger rev.1918に入ってるEFTのだけど、Livedoorブログのとはてなダイアリー用のが、全文取得できないページがあるのと、LivedoorのはRSSアグリゲータで変な表示になるので、少し書き直しました。こ…

桜庭一樹日記と、404 Flog Not Foundと、はまちちゃんとGIGAZINEをPlaggerで読むようにしました。全文読めるととっても便利。Let's 怠惰。

EmEditorでも15.2MB、72000行に及ぶテキストから正規表現で逆方向に検索すると重いなぁ。順方向の検索は軽いけど。

通しでのテストもきちんと通りました。1ヶ所だけスキーマのテーブル名が間違っていて少しはまったけど、それ以外はとくに問題もなく。ためしに6件データを登録。このまま全データを登録してしまいたいところだけど、それをやると多分25000件くらい登録しない…

使えたらCarp::Clanが読み込むんだけど、ppmからインストールしようとするとインストール成功の表示のまま固まる。Ctrl+Cでプロセスを殺さないといけなくなっちゃいます。とりあえず必須じゃないから依存しないようにして回避。

導入してみた。テストを通せるものは全部自力で、通せないものはid:charsbarさんが公開してくれているWelcome to nginx!からダウンロード。ローカルにリポジトリ立ててるので、これでCatalyst、DBIx::Class、Plaggerはネットにつながってなくてもすぐに使え…

via.プログラミングメモ - SHA256 の出力を64進数にする 面白いけど、UNIXとかのcase sensitiveなファイルシステムじゃないと使えないから、case insensitiveなWindows環境でもこういうことをやるにはどうしたらいいかなとか。簡単なのはアルファベット+数字…

これでサムネイルが出力できるようになりました。次は通しでテストをしないといけない。ファイルの読み込み、サムネイル作成、ファイルの移動、RDBへの登録。これだけ通しでテストを書いて、それを通せばまず第一段階はクリアかな。

友人が家のLANがおかしいというので、行ってみて設定を少しいじってきました。ルータが2重につながっていて、その間でポートマッピングがおかしかっただけみたいです。多分これで大丈夫。某p2pも相手に蹴られたりしないできちんと動いたし。どこかの神父様な…

XML::SAXの0.15が出てます。試してみた感じ、ppmでwarningsがたくさん出る例のアレは解決してるみたい。

インスタンス内に保持するように変更。次は、えっと、ファイル出力の実装か。ファイルハンドルとファイル名のどちらでも対応できるようにしたいけど、まずはファイル名の場合を実装して、必要になったらファイルハンドル渡しも対応させればいいかな。変更し…

Evangeline::Util::Imageの依存モジュールがどんどん増えてる。たぶんこれ以上は増えないと思うけど、どうだろう。 Carp Class::Data::Inheritable Digest Encode File::Basename File::Copy File::Temp Image::Info Image::Magick Term::Encoding

返値がEvangeline::Util::ImageクラスじゃなくImage::Magickクラスのインスタンスなのはどうかなぁと思った。同じEvangeline::Util::Imageクラスのインスタンスを返したほうがいいような気がするので、そのあたりちょっと書き直そう。出力するメソッドはどう…

サムネイルを作るコードを実装。普通にImage::Magickに読ませるとダメ文字が含まれているときに死ねるので、そのあたりも適当にごまかしつつ作成。具体的には、File::Tempでテンポラリを作っていったんコピーして、そっちから読み込むようにしました。コード…

きちんとホワイトリストを書きなおし。全部ハッシュに突っ込んでしまいました。これでハッシュを引くだけで確認できます。モジュール内でmyで宣言した変数は、モジュール外からはアクセサを介さない限り変更できないし、アクセサは存在しないから多分大丈夫…

別にわざわざImage::Infoを使う意味はないよね。これも全部Image::Magickを使うように書き直そう。あー、けど、それをやるとまたAUTOLOAD周りに手を入れないといけなくなるのか…。めどい。

入出力の文字コードを指定できるようにimportを実装。指定しないときは、入力はTerm::Encodingを使って取得、出力はUTF-8を仮定します。クラス変数として持たせるために、Class::Data::Inheritableを使いました。

とりあえずホワイトリスト方式に切り替え。存在しないメソッドを呼んで例外を投げてみるテストも追加。文字コードはまた明日にでも。サムネイル作るコードも書かないとなぁ。方針は見えてるから、さほど手間取らないと思う。

朝食後 パキシル (10mg) ガスモチン (5mg) ルボックス (25mg) 昼食後 パキシル (10mg) ガスモチン (5mg) ルボックス (25mg) 夕食後 パキシル (10mg) ガスモチン (5mg) ルボックス (25mg) 就寝前 ロヒプノール (1mg) テトラミド (10mg)

AUTOLOAD周りに少し手を入れてみました。チェックに関してはまだ甘いかな。ブラックリスト方式になってるけど、ホワイトリストにした方が安全。使うのは私だけだから別にどうでもいいんだけどね。テストケースをきちんと書いてあるので、問題が発生しないこ…

use aliased 'Evangeline::Util::Image'; my $img = Image->new($_) or die $!; my $orig_name = $img->name; my $id = $img->digest('SHA-256'); my $md5 = $img->digest('MD5'); my ($width, $height, $size, $ext) = $img->get(qw/width height size ext/…

はてなが豆まき*1してるあいだ、私はLANケーブル買ってきて、モデムとルータを2階に移して配線して、ついでに豆まきもしてました。ふぅ、少し疲れちゃった。 *1:メンテナンスともいう