briandfoy

#!perl
use v5.10;
use experimental qw(signatures);

use File::Path qw(make_path);
use File::Spec::Functions;
use Mojo::DOM;
use Mojo::URL;
use Mojo::Util qw(dumper);
use XML::LibXML;

briandfoy

theme = perl7

[TestingAndDebugging::RequireUseStrict]
add_themes = perl7

[TestingAndDebugging::RequireUseWarnings]
add_themes = perl7

[InputOutput::ProhibitBarewordFileHandles]
add_themes = perl7

briandfoy

Minion draft outline

• Introduction

• Setup

  • SQLite
  • Postgres
  • dashboard
  • enqueue a job, run a task
  • one Minion to bind them all

briandfoy

#!/Users/brian/bin/perl -CASD
use v5.30;
use open qw(:std :utf8);

use Math::Random::Secure qw(irand rand);

=encoding utf8

=head1 NAME

briandfoy

#!perl
use v5.26;
use strict;
use warnings;
use feature qw(signatures);
no warnings qw(experimental::signatures);

=encoding utf8

=head1 NAME

briandfoy

#!/bin/sh

<< 'DOCS'
	This is a small script I use to run speedtest from cron so I
	can monitor some network performance. The speedtest command
	comes from the speedtest-cli Python project:

		https://github.com/sivel/speedtest-cli

	This writes to the log file "speedtest.csv" or the file you specify in SPEEDTEST_LOG:

briandfoy

I'm not committing to the book just yet, but I'm thinking about what the outline would be.
I'm thinking about running another Kickstarter if I can find a major sponsor like I did
last time. Email me if you might be that person.

The basic idea is a tutorial book on writing  that would start from scratch and build up. 
This is specifically not a reference book that covers every aspect of Mojolicious. The 
trick is to figure out all the topics that should be in the book and how to introduce them 
gradually. Most topics should be relevant to most of the audience, while uncommon tasks 
or lightly used features might not show up at all.

briandfoy

#!/Users/brian/bin/perl

use v5.10;

use CLDR::Number;
use Mojo::UserAgent;
use Mojo::Util qw(dumper);

my $url = 'http://www.espn.com/nfl/history/leaders/_/stat/passyards';

briandfoy

#!/Users/brian/bin/perl
use v5.10;

use Mojo::UserAgent;
use Mojo::Util qw(dumper);

my $ua = Mojo::UserAgent->new;

my $url = 'http://www.espn.com/nfl/superbowl/history/mvps';

briandfoy

#!/Users/brian/bin/perl
use v5.26;

use Mojo::UserAgent;
use Term::ANSIColor;

my $ua = Mojo::UserAgent->new;

my $url = 'https://www.thisamericanlife.org/archive';