Perl CPANモジュールガイドに、正規表現を作ってくれるCPAN moduleがあったから試してみた。アタマで考えなくても、CPAN moduleが頑張ってくれるのはいいかも。
#! /usr/bin/env perl
use strict;
use warnings;
use utf8;
use Encode qw/encode decode/;
use Regexp::Assemble;
my $reg = Regexp::Assemble->new;
while (<DATA>) {
chomp;
$reg->add(quotemeta $_);
}
print encode("utf-8",$reg->re). "\n";
__DATA__
AKB48
SKE48
NMB48
HKT48
乃木坂46
JKT48
結果
hiro@mbp [ 9:40PM] ~/ perl ./test.pl (?^u:(?:(?:(?:AK|NM)B|[HJ]KT|SKE)48|乃木坂46))
追記.
gistに登録したから、日記に貼ってみた。ついてにちょっと手直しもしてみた。gistから簡単にcode貼れるのすげぇ便利だな。
]]>iPad用にスタイラスペンを購入したので、アプリ上で自宅のコンピュータ構成図を書いてみた。
スタイラスペンは「Su-Pen」、アプリは「Bamboo Paper」を使用。ペンはそこそこの太さを持っており握りの感覚は悪く無く、アプリの上での書く感触は悪く無いが、ペン先が見づらいのぶん細かい文字とかが書きづらい。多分ペン先が細ければ細かい文字も書きやすくなると思われるが、逆にアプリ上でペンに反応しづらくなるような気がするので、難しいところ。安くて細いスタイラスペンを買って試してみようかな。
と、ここまですべてiPad上で書いてみた。
]]>ameblo.jpの話、もー何回目か覚えてないけど。
知らないうちに仕様がいろいろ変わっていて、余分なヘッダー部とかまで拾ってきて、アイドルちゃんの日記読むのにひじょーにメンドクサイだったが、以下の方法で本文だけ拾ってくるように対応した。しばらく様子見てみたけど、これで大丈夫っぽい。ふつーに正規表現で書いてあげればよかったんですな。
author: Yoshiure Yasutono handle_force: http://ameblo\.jp/ extract: (?:<div class="contents">|<div class="articleText">)(.*?)<!--entryBottom--> extract_capture: body]]>
業務の関係で、いまだにフロッピーディスクを使って作業する事が頻繁にあるんだけど、去年会社で買ったWindows 7仕様のThinkPad T520に繋いだUSB-FDドライブの調子悪かった。調子が悪いというよりは、エクスプローラ等でFDドライブにアクセスすると、しばらく待たないとフロッピーディスクの内容が見れないという現象が出てしまうという。待たされる事もなくフロッピーディスクの内容が見れるのがふつーなんだけどね。
さすがに毎回毎回ぼーっと待つというのも精神的に苦痛になってきたので、何らか対策無いかなぁと調べていたら、どうやら↓ではないかなと想定。
これかなぁと想定して、patchを当ててみたら見事ビンゴ。アクセスしても毎回毎回待たされる事が無くなり平和が訪ずれました。ま、今の時代、USB-FDドライブを使う事自体がどうなんだって話もあるけどね。
]]>去年1年を、今年の今になって軽く纏めてみた。いろいろ出掛けてるなー。今年はアップアップを中心に動く方向では考えているけど、基本東京だからそんなに頻繁に参戦できないなぁ。まぁのんびり活動していきましょうと。
]]>本当は年末・年始に移行してしまおうと思っていたのだが、風邪をひいてしまい、移行作業が今日となってしまった。という事で、日記のサイトが http://iidakaori.org/ から http://hirokun.org/ (ここ)へと移行します。
移転しますが、やはり昔ほど毎日更新は難しいので、ぽちぽちと書いていきます。あと、Twitter発言も載せてましたが、こればかりになるのもあんまりかっこよくないので停止し、iidakaori.org側にある日記記事を少しずつhirokun.orgに移行していこうかなとは考えているけど、実はそれがけっこう大変な作業なのかもなぁ…
なにはともあれ、今後もよろしくお願いします。
]]>