syslogにnamedプロセスからのdaemon.noticeメッセージが大量に出ていたので調べてみました。 Jan 28 14:09:27 host-name named[9965]: [ID 873579 daemon.notice] clients-per-query decreased to 12 Jan 28 14:29:27 host-name named[9965]: [ID 873579 dae…

やりたいこと Last.fmのAPI(http://www.audioscrobbler.net/data/webservices/)と XML::Simple モジュールを使って、"ragtime"というタグ名からTopArtist(人気のあるアーティスト)を抜き出す。 #!/usr/local/bin/perl use strict; use warnings; use LWP::Si…

さくらインターネットのレンタルサーバでは vim, screen, zsh が入っていないため、インストールをしました。 Vim のインストール (Ver 7.1) さくらインターネットの共用サーバに vim をインストールする - talk to oneself 2を参考に・・ ~/.vimrc ファイル…

## ビジュアルベルを無効 vbell off ## ステータス行の設定 hardstatus alwayslastline "[%02c] %`%-w%{=b bw}%n %t%{-}%+w" ## スタートアップ時メッセージ無効 startup_message off ## 自動でデタッチする autodetach on ## 文字コードにUTF-8を使う defut…

■子供に尾崎を聴かせると盗んだバイクで走り出してしまうからダメ http://neta.ywcafe.net/000824.html タイトルでついクリックしてしまった３１の夜。 「モバゲーダウン」という１０〜２０代の若い世代に人気の携帯サイトがあります。このサイトが未成年に…

Dog Health Center - Jazz by Mail より、ジャンルが"Ragtime & Novelty"であるアルバムのURLを取得してみました。（１ページ目のみ） scraperだけでは余計な行も入ってきてしまうため、配列に入れ直しています。 #!/usr/bin/perl use strict; use warnings;…

Webサービスを作ってみようということで、ついにレンタルサーバ（さくらインターネット）を借りました。まずはsshでログインして、PerlモジュールのWeb::Scraperを使えるようにします。 一般ユーザでCPANインストールができるようにする iandeth. - 一般ユー…

前回記事 Web::Scraperを使ってみた - ragutarouの日記 の発展形。 "see more"というリンクがなくなるまでリンクを辿りデータを取得していく。 #!/usr/bin/perl use strict; use warnings; use Web::Scraper; use WWW::Mechanize; use URI; use YAML; my $ur…

昨日、長澤さんに誘われ、すすきのにある『ピアノーラ』へ。 約半年ぶりで２回目だったんですが、ママさんはラグタイムを弾く人ということで覚えていてくれてました。 そこで The Easy Winners、Pineapple Rag、Maple Leaf Rag の３曲を弾かせてもらう。 小…

Webページから欲しい情報を取得してしまおうというのがスクレイピング。スパイダリングなんて言い方もする。 でもHTMLっていろいろな書き方があるからこれがなかなか大変。 今まではHTML::TreeBuilderとかHTML::TokeParserを使っていたけど、Web::Scraperと…

すっかり明けましておめでとうございます。 年末年始はとくにどこも行くことなく、ゆっくり本を読んでました。 あ、年末は４日連続忘年会とかやってたけど・・ さて、仕事に関してずっと思ってきていたこと。 「今までの自分は楽な道を歩きすぎてきたな」と…