2006-08-18から1日間の記事一覧

Cache::Memcachedにコールバック

Perl

なんかすでにありそう。 コードはSledge::Cacheのまんまパクリ。 package Cache::Memcached::CallBack; use strict; use warnings; use base 'Cache::Memcached';sub get_callback { my ($self, $key, $callback, $expiry) = @_; my $data = $self->get($key…

変更のあったモジュールの compile が通るか調べたい

Perl

http://d.hatena.ne.jp/tokuhirom/20060816/1155709160 #! /usr/bin/perl use strict; use warnings; use IPC::Run qw(run timeout);my $SVN_STAT = 'svn stat';for my $line (`$SVN_STAT`) { if ($line =~ m/(.+\.p[lm])/) { next if $line =~ /$0/; $line …