TristinDavis

package Mojolicious::Plugin::Dbic;

use Mojo::Base 'Mojolicious::Plugin';
use DBIx::Class;
use DBIx::Class::Schema::Loader;
    DBIx::Class::Schema::Loader->naming('v7');

use constant DEBUG => $ENV{MOJO_CONFIG_DEBUG} || 0;
my  $schemas = {};

kevinold

package Mojolicious::Plugin::MicroPipeline::CSSCompressor;
use Mojo::Base 'Mojolicious::Plugin';

use CSS::Compressor 'css_compress';

sub register {
  my ($self, $app) = @_;

  # Register "css_compressor" filter
  $app->filter(css_compressor => sub { css_compress shift });

kraih

package Mojolicious::Plugin::Pipeline::CSSCompressor;
use Mojo::Base 'Mojolicious::Plugin';

use CSS::Compressor 'css_compress';

sub register {
  my ($self, $app) = @_;

  # Register "css_compressor" filter
  $app->filter(css_compressor => sub { css_compress shift });

bduggan

Event Driven Programming

    - no blocking
    - no polling
    - no sleeping
    - events and callbacks

    - inotify vs stat
    - sleep vs timers
    - web services

dvinciguerra

#!/usr/bin/perl

use Mojolicious::Lite;

get '/' => { message => '' } => 'index';
post '/' => sub {
    my $self = shift;

    # getting params
    my $email    = $self->param('email')    || '';

dvinciguerra

#!/usr/bin/env perl  
  
use DateTime;   
use Mojolicious::Lite;   
   
get '/' => 'index';   
   
get '/service/datetime' => sub {  
   my $self = shift;  
   my $dt   = DateTime->now;  

larrybotha

Sublime Text Monokai Sidebar Theme

A theme for the sidebar in Sublime Text to match the workspace of the Monokai theme.

This theme only modifies the sidebar to better match the Monokai theme, without modifying any of the styling elsewhere defined by Monokai.

File location: Packages/User

For a theme that extends beyond just the sidebar, visit https://gist.github.com/umpirsky/5842174

kraih

use Mojolicious::Lite;
use EV;
use IO::Async::Process;
use IO::Async::Loop::EV;

my $loop = IO::Async::Loop::EV->new;

get '/' => sub {
  my $self = shift;

kraih

#!/usr/bin/env perl
use Mojolicious::Lite;
use Coro;
use Mojo::IOLoop;

Mojo::IOLoop->recurring(0 => sub {cede});

hook around_dispatch => sub {
  my $next = shift;
  async { $next->() };

bduggan

#!/usr/bin/env perl

# put.t

use Test::More tests => 3;
use Mojolicious::Lite;
use Test::Mojo;

$ENV{MOJO_MAX_MEMORY_SIZE} = 2;   # Force temp files.
$ENV{MOJO_TMPDIR} = "/nosuchdir"; # test setting tempdir dynamically