2008年10月アーカイブ

たまには季節ものの話題でも。

$ perl -E 'say trick or treat'

$

...

何ももらえなかった（´・ω・｀

気を取り直して..

$ perl -E 'say "trick" or "treat"'
trick
$

...

いたづらされますた

このままではお菓子はもらえない。一大事。どうしよう.

drawr でコメント描いてたやつの途中絵。

途中ちゅうか、ここまで描いてから「そういや今回のは水着じゃないっ」って気付いて、頑張って直した。下は結局水着のままでしたが。

tuki_no_sabaku.mid

昔作って放置してたやつ。

参考：月の沙漠@wikipedia

元ネタ→ http://twitter.com/nakawankuma/status/973288693 及びその周辺

こうですか＞＜

use strict;
use warnings;

use IO::File;
use File::Find;
use threads;
use Thread::Queue;

my $max_threads = 7;

if (@ARGV < 3) {
  print "usage: $0 <pattern> <file-pattern> <basedir> [<basedir> ...]\n";
  exit;
}
my $pattern = shift;
$pattern = qr/$pattern/;

my $fpattern = shift;
$fpattern = $fpattern ? qr/$fpattern/ : undef;

my $q = Thread::Queue->new;
my @thr = map { threads->create(\&grep_each, $q) } 1 .. $max_threads;

find({ wanted => sub {
    $q->enqueue($_) if -f $_ && (!$fpattern || $_ =~ m{$fpattern});
  }, no_chdir => 1}, @ARGV);

$q->enqueue(undef) for @thr;
$_->join for @thr;

sub grep_each
{
  my ($q) = @_;

  while ( my $file = $q->dequeue ) {
    my $f = IO::File->new($file);
    if ( !$f ) {
      print STDERR "*** cannot open $file\n";
      next;
    }
    
    my $i = 1;
    for my $line ( <$f> ) {
      print "$file:$i:$line" if $line =~ m{$pattern};
    }
    continue {
      ++$i;
    }
  }
}

pattern file-pattern 共に正規表現を指定(globパターンじゃないよ)なので、そこだけ注意だ！

Req:タイマー張りたい

my $id = $widget->after($milliseconds, \&callback); # 一回きり
my $id2 = $widget->repeat($milliseconds, \&callback2); # 繰り返す

Req: タイマーキャンセルしたい

$id->cancel; # または
$widget->afterCancel($id);

Req: Tk::Entry 内でEnterキーを押されたらhogehogeしたい

$entry->bind('<Return>' => sub { hogehoge; });

Req: MainWindowのLoad後にhogehogeしたい (VBでいうとこのFormLoadイベントハンドラ)

$mainwnd->bind('<Expose>' => sub { hogehoge; });

たった今某所から「資料を見て見解を教えれ」って送られてきたExcelファイル。

え"－－(うちのPCはOfficeXPが入ってる)

よろしい、ならばscalcだ

PostToTwitterが記事編集時にもpostしてしまうので、オプションをいじってみるテスト

どうやら大丈夫なご様子。プラグインのオプションには「下書きから公開にしたときのみ...」とかあるけど、いきなり公開でもちゃんとTwitterにpostされますです。

• libjpeg
• libpng
  • libz
• libgif (giflib)

cpan/cpanp から一旦install、builddir に行って、 --incpath --libpath 付きで再構築

で、いいのかな。--incpath --libpath がcpan/cpanp から指定できればいいのだけど..

リリースノートが出てたんで、更新しておきました。

セキュリティフィックスらしいので、MT4系を導入してる方は是非。

という問題にこの間半日ほど悩んだので、原因と対処法をば...

ケース1：こんなの

public abstract class BaseForm : Form
{
  public abstract void hoge();
}

public class DerivedForm : BaseForm
{
  public override void hoge() { /* なにやら */ }
}

ケース2：こんなの

public class BaseForm : Form
{
  public BaseForm()
  {
    this.Load += new System.EventHandler(this.FormLoad);
  }

  private void FormLoad(object sender, System.EventArgs e)
  {
    throw new Exception("hoge");
  }
}

public class DerivedForm : BaseForm
{
}

gimpが2.6になってたので、インストールして試し描きしてみた。

リリースノートはこちら

BrushDynamicsがいい感じかな。てきとーにうにうに塗るのが好きなので。

タイトル横にカテゴリを入れて、シグニチャ付けて。

タイトル [カテゴリ] (URL) [at FloralCompany.log]

って感じのフォーマットになってるはず

ので、テスト投稿です。MT3系統用なんだけど、MT4でもうまくいくかしら

子供とは可愛いものなのです。

異論は認めません。

無防備に薄い布を晒す幼女かわゆす

C++プログラミングの処方箋 をAmazonで購入。(メインの買い物はペンタブの替え芯だったんですが、配送料無料に届かなかったので(ぉ )

通勤時間にちまちま読んでく予定ー （電車乗ってる時間は計20分強しかないですが(汁

その前に詳説正規表現第3版、まだ読み終わってないんだけど、どうしよう...

一時間で緑色の髪のキャラを描こうとかいう企画のようなものに乗ってみましたことよ