Skip to content

Instantly share code, notes, and snippets.

View athomason's full-sized avatar

Adam Thomason athomason

  • Fastly
  • San Francisco, CA
View GitHub Profile
#!/usr/bin/env perl
use strict;
use warnings;
use feature ':5.10';
use Time::HiRes qw(time);
my $iterations = 1000000;
use strict;
use warnings;
use Danga::Socket;
use Gearman::Client::Async;
my $count = shift || 1000;
my $client = Gearman::Client::Async->new(job_servers => ['127.0.0.1:7003']);
use strict;
use warnings;
use AnyEvent;
use AnyEvent::Gearman::Client;
my $count = shift || 1000;
my $client = AnyEvent::Gearman::Client->new(job_servers => ['127.0.0.1:7003']);
use strict;
use warnings;
use Gearman::Worker;
my $worker = Gearman::Worker->new;
$worker->job_servers('127.0.0.1:7003');
$worker->register_function(test => sub {
return 1;
use strict;
use warnings;
use Danga::Socket::AnyEvent;
use Gearman::Client::Async;
my $count = shift || 1000;
my $client = Gearman::Client::Async->new(job_servers => ['127.0.0.1:7003']);
use strict;
use warnings;
use Danga::Socket::AnyEvent;
use Gearman::Client::Async;
my $count = shift || 1000;
my $client = Gearman::Client::Async->new(job_servers => ['127.0.0.1:7003']);
@athomason
athomason / client-anyevent.pl
Created May 20, 2011 00:16
AnyEvent::Gearman::Client memory leak
use strict;
use warnings;
use AnyEvent;
use AnyEvent::Gearman::Client;
my $count = shift || 1000;
my $client = AnyEvent::Gearman::Client->new(job_servers => ['127.0.0.1:7003']);
@athomason
athomason / client-anyevent.pl
Created May 22, 2011 20:38
AnyEvent::Gearman::Client memory leak, object edition
use strict;
use warnings;
use AnyEvent;
use AnyEvent::Gearman::Client;
use Devel::Cycle;
use Data::Dumper;
use Devel::Events::Handler::ObjectTracker;
org.idoox.util.RuntimeWrappedException: unknown/expired instance ID called: ws-ext004.us-ec.adtech.com:2011.06.16 01:46:38 GMT:C1AC1321FAE621E0:9C05
======= Server stack trace =======
org.idoox.util.RuntimeWrappedException: unknown/expired instance ID called: ws-ext004.us-ec.adtech.com:2011.06.16 01:46:38 GMT:C1AC1321FAE621E0:9C05
at com.idoox.wasp.server.adaptor.RPCInstanceSelector.init(RPCInstanceSelector.java:97)
at com.systinet.wasp.server.adaptor.JavaInvoker.beginInvoke(JavaInvoker.java:342)
at com.idoox.wasp.server.adaptor.JavaAdaptorImpl.beginInvoke(JavaAdaptorImpl.java:63)
at com.idoox.wasp.server.AdaptorTemplate.javaInvocation(AdaptorTemplate.java:511)
at com.idoox.wasp.server.AdaptorTemplate.doDispatch(AdaptorTemplate.java:391)
@athomason
athomason / gist:7344965
Created November 6, 2013 22:07
.vim/colors/adam.vim
" vim: tw=0 ts=4 sw=4
" Vim color file
" Derived from koehler.vim
set background=dark
hi clear
if exists("syntax_on")
syntax reset
endif
let g:colors_name = "adam"