use Perl

Before I go either side, which of Mouse or Moose alone makes more sense than using Any::Moose? Just checking.

I have nothing against Mouse, but I'd like my app to run with either one of Mo[ou]se. For those applications wanting the lighter side of things, could we please make it a standard to use Any::Moose instead?

Really, I just want to choose which backend to use myself, rather than having to deal with two of them.

Please?

P.S., I've written Module::Install::Any::Moose for this kind of thing.

FYI I've never traveled to/from China or Korea, so I don't know about the travel arrangements there, but if in case any of you plan to stay in Japan and travel a bit, you /definitely/ want to look at Japan Rail Pass (http://www.japanrailpass.net/). Travel costs are usually insane within Japan, but with this pass, you get a free ride on any JR operated transportation including bullet trains for a given amount of time.

Last year in a sudden fit of madness, I went and started talking to a publisher in Japan, asking if I could write a book about Perl.

Well, there was a brief moment of no activity, some crazy time trying to move my company to a new office, and then a stormy winter where I kept writing and writing and writing...

That works out perfectly. Let's try to coordinate on the timing ;)

While the enlightened folks (http://www.enlightenedperl.org/) are working steadily towards their goal in the Western world, us folks in the Far East have something of our own that's being cooked up by the community.... and so here I am, pre-announcing the Japan Perl Association.

Last weekend, in seeing a blog post (note, it's in Japanese), I realized that while there is a version being developed by Tim Bunce, nobody had written a Cache::Memcached compatible interface to libmemcached.

Ah well there is one now. It's now available on CPAN

I'm really glad I wrote it, libmemcached is blazing fast!

Here's the output of running the benchmark included with the distro on my laptop:

  daisuke@beefcake Cache-Memcached-LibMemcached$ perl -Mblib tools/benchmark.pl
  ==== Benchmark "Simple get() (scalar)" ====
                  Rate  perl_memcahed memcached_fast   libmemcached
  perl_memcahed  3837/s             --           -80%           -88%
  memcached_fast 18939/s           394%             --           -42%
  libmemcached   32895/s           757%            74%             --
  ==== Benchmark "Simple get() (w/serialize)" ====
                    Rate  perl_memcahed memcached_fast   libmemcached
  perl_memcahed   3658/s             --           -77%           -84%
  memcached_fast 16077/s           340%             --           -29%
  libmemcached   22727/s           521%            41%             --
  ==== Benchmark "Simple get() (w/compression)" ====
                    Rate  perl_memcahed memcached_fast   libmemcached
  perl_memcahed   3720/s             --           -74%           -81%
  memcached_fast 14535/s           291%             --           -27%
  libmemcached   19841/s           433%            37%             --
  ==== Benchmark "Simple set() (scalar)" ====
                    Rate  perl_memcahed memcached_fast   libmemcached
  perl_memcahed   7163/s             --           -61%           -77%
  memcached_fast 18519/s           159%             --           -41%
  libmemcached   31447/s           339%            70%             --
  ==== Benchmark "Simple set() (w/serialize)" ====
                   Rate  perl_memcahed memcached_fast   libmemcached
  perl_memcahed  3529/s             --           -31%           -41%
  memcached_fast 5086/s            44%             --           -15%
  libmemcached   6002/s            70%            18%             --
  ==== Benchmark "Simple set() (w/compress)" ====
                    Rate  perl_memcahed   libmemcached memcached_fast
  perl_memcahed   6684/s             --           -39%           -63%
  libmemcached   10989/s            64%             --           -39%
  memcached_fast 17986/s           169%            64%         --

Of course, there are some loose ends. First, there's that last benchmark entry (set w/compression) where Cache::Memcached::Fast is faster than libmemcached. I haven't really looked into it. Also, I haven't implemented stat() and the various libmemcached-specific stuff like consistent hashing, mostly because I've run out of tuits for now. Patches and/or comments are welcome. the svn repository is at

http://svn.coderepos.org/share/lang/perl/Cache-Memcached-LibMemcached/trunk

Last weekend, in seeing a blog post (note, it's in Japanese), I realized that while there is a version being developed by Tim Bunce, nobody had written a Cache::Memcached compatible interface to libmemcached.

Ah well there is one now. It's now available on CPAN

I'm really glad I wrote it, libmemcached is blazing fast!

Here's the output of running the benchmark included with the distro on my laptop:

  daisuke@beefcake Cache-Memcached-LibMemcached$ perl -Mblib tools/benchmark.pl
  ==== Benchmark "Simple get() (scalar)" ====
                  Rate  perl_memcahed memcached_fast   libmemcached
  perl_memcahed  3837/s             --           -80%           -88%
  memcached_fast 18939/s           394%             --           -42%
  libmemcached   32895/s           757%            74%             --
  ==== Benchmark "Simple get() (w/serialize)" ====
                    Rate  perl_memcahed memcached_fast   libmemcached
  perl_memcahed   3658/s             --           -77%           -84%
  memcached_fast 16077/s           340%             --           -29%
  libmemcached   22727/s           521%            41%             --
  ==== Benchmark "Simple get() (w/compression)" ====
                    Rate  perl_memcahed memcached_fast   libmemcached
  perl_memcahed   3720/s             --           -74%           -81%
  memcached_fast 14535/s           291%             --           -27%
  libmemcached   19841/s           433%            37%             --
  ==== Benchmark "Simple set() (scalar)" ====
                    Rate  perl_memcahed memcached_fast   libmemcached
  perl_memcahed   7163/s             --           -61%           -77%
  memcached_fast 18519/s           159%             --           -41%
  libmemcached   31447/s           339%            70%             --
  ==== Benchmark "Simple set() (w/serialize)" ====
                   Rate  perl_memcahed memcached_fast   libmemcached
  perl_memcahed  3529/s             --           -31%           -41%
  memcached_fast 5086/s            44%             --           -15%
  libmemcached   6002/s            70%            18%             --
  ==== Benchmark "Simple set() (w/compress)" ====
                    Rate  perl_memcahed   libmemcached memcached_fast
  perl_memcahed   6684/s             --           -39%           -63%
  libmemcached   10989/s            64%             --           -39%
  memcached_fast 17986/s           169%            64%         --

Of course, there are some loose ends. First, there's that last benchmark entry (set w/compression) where Cache::Memcached::Fast is faster than libmemcached. I haven't really looked into it. Also, I haven't implemented stat() and the various libmemcached-specific stuff like consistent hashing, mostly because I've run out of tuits for now. Patches and/or comments are welcome. the svn repository is at

http://svn.coderepos.org/share/lang/perl/Cache-Memcached-LibMemcached/trunk

lestrrat writes "Okay, so I'm heavily heavily using STOMP lately. I'm building systems that rely on POE::Component::MessageQueue, and now I need to implement the client portion in POE.

So I grab POE::Filter::Stomp, and I notice it's broken. I could send in patches, but that module has no tests. That to me calls for a rewrite, really, but it's not my module.

Anyway, I was in a bit of a hurry, so I just re-implemented the module with tests and all (well, they aren't the greatest of tests, but they at least excercise *something*). So I conjured up a tarball and email the author...

and he turns out to be MIA. yikes.

So now I'm going to have to send emails to modules@perl.org, wait for god knows how long until the author is official accepted as MIA...

Argh, no, I can't wait. Fine, I won't upload it to CPAN. But here's my repository:

    http://svn.endeworks.jp/svn/perl/POE-Filter-Stomp/trunk


Feel free to bang on it, I'm all up for fixing things -- I really need a stable STOMP infrastructure. Let me know if you use it.

P.S. If the author of POE-Filter-Stomp reads this, please contact me!"

Update: Apparently the author is still around. My emails keep being bounced, though... hmm.

Okay, so I'm heavily heavily using STOMP lately. I'm building systems that rely on POE::Component::MessageQueue, and now I need to implement the client portion in POE.

So I grab POE::Filter::Stomp, and I notice it's broken. I could send in patches, but that module has no tests. That to me calls for a rewrite, really, but it's not my module.

Anyway, I was in a bit of a hurry, so I just re-implemented the module with tests and all (well, they aren't the greatest of tests, but they at least excercise *something*). So I conjured up a tarball and email the author...

and he turns out to be MIA. yikes.

So now I'm going to have to send emails to modules@perl.org, wait for god knows how long until the author is official accepted as MIA...

Argh, no, I can't wait. Fine, I won't upload it to CPAN. But here's my repository:

    http://svn.endeworks.jp/svn/perl/POE-Filter-Stomp/trunk

Feel free to bang on it, I'm all up for fixing things -- I really need a stable STOMP infrastructure. Let me know if you use it.

P.S. If the author of POE-Filter-Stomp reads this, please contact me!