This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
package Test::Mojo::Role::Controller; | |
use Role::Tiny; | |
use Mojo::Loader 'load_class'; | |
sub controller { | |
my $t = shift; | |
my $class = shift; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
my @dirty_files = ( 'dist.ini', 'Changes', 'META.json', 'README.md', | |
$self->build_file ); | |
my @exclude_release = ('README.md'); | |
$self->add_plugins( | |
# Only include files present in Git Repo | |
[ 'Git::GatherDir', | |
# Exclude files we'll update in build |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
# works with Moose 2.1801, fails with Moose 2.1802 | |
package MyMooRole { | |
use Moo::Role; | |
use MooX::HandlesVia; | |
use Types::Standard qw/ HashRef Str /; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
use strict; | |
use warnings; | |
{ | |
package MyClass; | |
use Moose; | |
with 'Role::REST::Client'; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
log4perl.logger.default = INFO, PipeAppender | |
log4perl.appender.PipeAppender = Log::Log4perl::Appender::File | |
log4perl.appender.PipeAppender.mode = pipe | |
log4perl.appender.PipeAppender.filename = logstash-forwarder -config /path/to/conf | |
log4perl.appender.PipeAppender.layout = PatternLayout | |
log4perl.appender.PipeAppender.layout.ConversionPattern = {"level":"%c","message":"%m{chomp}"}%n |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
root@debian:/home/metacpan/explorer.metacpan.org# /home/metacpan/bin/install_modules --installdeps . | |
/home/metacpan/bin/install_modules: eval: line 29: unexpected EOF while looking for matching `'' | |
/home/metacpan/bin/install_modules: eval: line 30: syntax error: unexpected end of file | |
install into /usr/local/perlbrew/perls/perl-5.16.2/bin/perl (v5.16.2) ? | |
--installdeps | |
. | |
[yes/no]: no |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
package Mojo::Log::JSON; | |
use Mojo::Base 'Mojo::Log'; | |
use HTTP::Date qw/ time2iso /; | |
use JSON qw/ to_json /; | |
sub format { | |
my ( $self, $level, @lines ) = @_; |