Skip to content

Instantly share code, notes, and snippets.

::Class.meta.add_method('CREATE' => method (%params) {
# this just gathers all the
# attributes that were defined
# for the instances.
my %attrs;
my Dispatcher $dispatcher = $class.dispatcher(:descendant);
for WALKCLASS($dispatcher) -> Class $c {
for $c.get_attribute_list() -> $attr {
my $attr_obj = $c.get_attribute($attr);
%attrs{$attr} = instantiate_attribute_container($attr_obj);
#!/usr/bin/perl
use strict;
use warnings;
use Test::More;
use Test::Fatal;
use Test::Moose;
BEGIN {
#!/usr/bin/perl
use strict;
use warnings;
use Test::More;
use mop;
my $Foo = $::Class->new;
@stevan
stevan / test
Created July 28, 2011 20:10
test
test
@stevan
stevan / gist:961851
Created May 9, 2011 00:33
Marriott Launch Plan
- git update all servers
- proxy
- app1
- app2
- registration
- db
- dump-all-databases
- dump property-registration separate (just in case)
{
"backend_addr" : "tcp://127.0.0.1:5555",
"frontend_addr" : "tcp://127.0.0.1:6666",
"publisher_addr" : "tcp://127.0.0.1:7777",
"subscriber_addrs" : [
// one for each worker ...
"tcp://127.0.0.1:8880"
]
}
#!perl
use 5.10.0;
use strict;
use warnings;
use Data::Dumper;
use ZeroMQ qw/:all/;
my $coord_addr = 'tcp://127.0.0.1:6666';
#!perl
use 5.10.0;
use strict;
use warnings;
use Data::Dumper;
use ZeroMQ qw/:all/;
my $coord_addr = 'tcp://127.0.0.1:5566';

Moose Ecosystem Overview

I was browsing Planet Perl Iron Man over the holidays and reading many of the "Year in Perl" recaps as well as the "Perl in 2011" predictions. One in particular caught my attention, that is What I would love to see in 2011 for Perl by claudio in which he has many nice words to say about Moose and the Modern Perl movement in general. As I started to read the comments I noticed one from brian d foy in which he said:

Note, though, that calling Moose "the preferred OO framework" is a bit of puffery. Some people prefer it, but I'll bet you most Perlers have never even looked at it. Not only that, the fragmentation of Mouse, Moose, Moo, and whatever else out there is starting to confuse people who have

@stevan
stevan / Moose-dividends.md
Created January 4, 2011 21:30
A list of Moose inspired modules

Moose spinoffs

  • Package::Stash
  • Class::Load
  • Dist::CheckConflicts
  • Test::DependentModules
  • Devel::GlobalDestruction
  • Eval::Closure
  • Package::DeprecationManager