Skip to content

Instantly share code, notes, and snippets.

View markstos's full-sized avatar

Mark Stosberg markstos

169 followers · 19 following
View GitHub Profile
@markstos
markstos / rt-to-github.pl
Created March 6, 2013 03:29
Based on [this copy of rt-to-github.pl](http://www.dagolden.com/index.php/1938/how-to-move-cpan-rt-tickets-to-github/) with the following updates: - The beginnings of a "dry run" mode. Currently just some "say" lines that you have manually uncomment, and comment out the related active lines - Support for importing comments (needs tested) - Bette…
#!/usr/bin/env perl
use v5.10;
use strict;
use warnings;
use Carp;
use IO::Prompt::Tiny 'prompt';
use Net::GitHub;
use Path::Tiny;
use RT::Client::REST::Ticket;
use RT::Client::REST;
@markstos
markstos / gist:4088910
Created November 16, 2012 16:51
Design attempt for a Moose role to provide access to a singleton config object
package Project::Role::Config;
use Moose::Role;
use Project::ConfigSingleton;
use Project::ToolSet;
Project::ConfigSingleton->initialize;
# The config hash provided by this role is managed by a singleton class
has 'config_singleton' => (
lazy => 1,
isa => 'Project::ConfigSingleton',
@markstos
markstos / gist:3431863
Created August 23, 2012 03:23 — forked from schwern/gist:896004
Benchmarking simple accessors, Moose vs Moos vs Mouse vs Moo vs hand written vs a hash
#!/usr/bin/env perl
use strict;
use warnings;
use Carp;
BEGIN {
# uncomment to test pure Perl Mouse
# $ENV{MOUSE_PUREPERL} = 1;