yanick

#!/usr/bin/perl 

use 5.20.0;
use warnings;

use AnyEvent::SMTP::Server 'smtp_server';
use CHI;
use Email::Simple;

my $email_forward_cache = CHI->new(

yanick

use strict;

use Data::Printer;
sub x { \@_ }

my %foo = 'a'..'d';

my $bar  = x(%foo);

$foo{a} = "banana";

yanick

#!/usr/bin/env perl 

use strict;
use warnings;

use File::Serialize;
use List::Util qw/ pairmap /;
use DDP;

my ( @parent, $tasks, $crew );

yanick

// I miss TAP...
function pass() { return expect(true).toBeTruthy() }
function fail() { return expect(false).toBeTruthy() }
function ok(thing) { return expect(thing).toBeTruthy() }
function is(have,expected) { return expect(have).toBe(expected) }

yanick

use Vim::X;
use App::Uni;

use 5.20.0;

use strict;
no warnings;

sub UnicodePicker :Vim(args) {

yanick

use strict;
use warnings;

sub hashgregate(&@){
    my $sub = shift;
    my %agg;
    push @{$agg{$sub->($_)}}, $_ for @_;
    return wantarray ? %agg : \%agg;
}

yanick

#!/usr/bin/perl 

use 5.20.0;

package JSDoc::Viewer;

use Moose;
use Template::Caribou;
with 'Template::Caribou';

yanick

// Use Gists to store code you would like to remember later on
console.log(window); // log the "window" object to the console

yanick

#!/usr/bin/env perl

=usage

    mcpan moosex

=cut

use 5.20.0;

yanick

# To JavaScript and Back: Transfixing Tales of Transglotting Thefts (in Toronto)

Last year, Yanick took a deep dive into the JavaScript ecosystem and avidly drank
from the framework firehose. As part of the journey to understanding, he was
caught uttering "I wonder what that would look like in Perl..." a few times.

In this talk, we'll visit the result of this clash between learning and
hubris. We'll touch
[Redux](http://redux.js.org/)/[Pollux](https://metacpan.org/release/Pollux),
[MobX](https://mobx.js.org/)/[MoobX](https://metacpan.org/release/MoobX), and might even