週末には少しPerlを。

Perlスクリプトの学習日記です。

2013-03-01から1ヶ月間の記事一覧

Log::Log4perlのEasy ModeでプロセスのPIDもログに出力する

お手軽なログ出力 自分のスクリプトにデバッグ目的でたくさんのprint文を入れるのが常なのですが、 最近はLog::Log4perlを使うことを覚えました。 Easy Mode というものが簡便に使えて、たとえば use Log::Log4perl qw( :easy ); Log::Log4perl->easy_init( …

設定ファイルから読み込んだパラメータ内容をGetopt::Lucidを使ってコマンドラインオプションで上書きする

設定ファイルとコマンドラインオプションの優先順位の問題 スクリプトの中のパラメータの一部をコマンドライン引数で指定した設定ファイルから読み込むようにしたい、 さらにその内の任意の項目をコマンドラインオプション指定で上書きできるようにしたいと…

いかにしてメイドさん画像をダウンロードするか~FC2編

Webサイトを巡回して画像ファイルを得る Googleなどで「メイド 画像」を検索しているとfc2.comドメインのWebページが 少なからずヒットします。 そこでこれらのWebページを巡回してメイドさん画像をダウンロードする スクリプトを書いてみました。おおまかに…

Webページから一定の大きさ以上のJPEG画像ファイルをダウンロードする

ビッグデータの時代に 情報が氾濫するこの時代に真に意味のある情報とは何でしょうか。 価値観は人それぞれでしょうが、さしあたりここでは「150キロバイト以上のサイズのJPGイメージファイル」こそ 有意な情報であるという前提とします。 目標 対象とするWe…

MySQLデータベースにINSERT文で行を挿入しようとしたときの一意キー制約によるエラーを無視する

一意キー制約 MySQLデータベースを使っていて、列が1つだけの表にどんどんレコードを追加していきたい、 ただし重複したデータは登録したくないとします。 テーブル作成時に該当の列に一意キー制約をかけておくと mysql> create table tbl_sometest (url va…

いかにしてメイドさん画像をダウンロードするか~2013

元ネタ ゆーすけべーさんの有名なブログエントリ 「いかにしておっぱい画像をダウンロードするか~2012」 をほとんどそのまま利用して「おっぱい」を「メイド」に置き換えれば 大量のメイドさん画像を得ることができます。 この元ネタはゆーすけべーさんの以…

CentOS 6.3にMovable Type 5.2.3をインストールして女子との出会いの確率を上げる

Movable Typeの世界は女子率が高いとの話 を先日のKansai.pm 第15回ミーティングにて聞きましたので 将来あるかも知れないMT女子との合コンの機会に備えて インストールくらいしておこうと思ったわけです。 ダウンロード 公式サイトから個人無償版をダウンロ…

Net::OpenSSH 0.60 のタイムアウト時の動作を眺める

Net::OpenSSH Kansai.pm 第15回ミーティングでの @shiba_yu36 さんの Cinnamon の紹介を聞いて、Cinnamonの中で使われているという Net::OpenSSH に興味を持ちました。 リモートのサーバーにSSH接続してコマンドを実行するための モジュールですが、気になる…