Stevan Little stevan

Moose Hackathon Agenda

This is a list of topics/ideas/wishes/dreams that we will discuss during the Moose hackathon at YAPC::NA this year. They are in no particular order, nor does inclusion of this list imply any type of endorsement of the idea, these are just ideas, so please feel free to add yours in.

Traits/Roles in Class::MOP
- A low-level trait/role type primitive
removing Test::Exception from Moose/MOP

Moose spinoffs

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

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

	package MyRole;

	...

	package MyBaseThing;

	with MyRole;

	....

	use Data::Verifier;
	use DateTimeX::Easy;
	use MooseX::Types::DateTime qw(TimeZone DateTime);
	use MooseX::Types::Moose qw/Str/;
	use MooseX::Types;

	use feature ':5.10';

	my $verifier = Data::Verifier->new(
	filters => [ qw(trim) ],

	use Moose::Util::TypeConstraints;
	use MooseX::Params::Validate;

	subtype 'Filename' => as 'Str' => where { -x $_ };

	sub foo {
	my ($name) = pos_validated_list( \@_, { isa => 'Filename' } );
	print "Houston, we have a filename: $name \n";
	}

	use Android;
	my $a = Android->new();
	use Plack::Runner;
	use Plack::Request;

	my $runner = Plack::Runner->new;
	$runner->parse_options(qw[
	--server HTTP::Server::PSGI
	--port 8888
	]);

	use MooseX::Declare;
	class MyClass {
	method mymethod(Str $aaa) {
	return $aaa;
	}
	}

	my $aaa = MyClass->new;
	warn $aaa->mymethod(['aaa']);

	#!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';