willwillis

An Second Attempt at Modern Web, in a Weekend.

Friday Dec 13

Learning Resources

• AppSync (GraphQL, Amplify) & Angular w/Monorepo (Nx)
  • AWS Developer Docs Didn't get too far here, but I spun up an AppSync Model in just a few seconds.
  • Youtoube Video ✔ Watched

• Youtube vid by Nrwl ✔ Watched

willwillis

who knew? https://colab.research.google.com/notebooks/welcome.ipynb

willwillis

1. starting here: https://www.youtube.com/watch?v=OSnRl8yF9a4
1.a https://www.bernat.tech/pep-517-and-python-packaging/

willwillis

https://github.com/gangverk/flask-swagger
https://mmcardle.github.io/django_builder/#!/home
https://www.django-rest-framework.org/
https://github.com/Brobin/drf-generators (4 different models.. why so many, I probably don't understand drf)
https://github.com/agconti/cookiecutter-django-rest
https://github.com/jpadilla/django-project-template (More for vanilla django)
https://github.com/django-json-api/django-rest-framework-json-api (this looks promising)

willwillis

#!/usr/bin/perl

# Script to retrieve a list from sharepoint, which contains
# /etc/hosts type information and dump it in hosts format
#
# It's recomended to enter the username on the command line and let it prompt
# for the password
#
# The column names for the list items are hard coded.
#

willwillis

#!/usr/bin/perl -w
use strict;

use LWP::Simple;
use HTML::TokeParser;
use HTML::Entities;

#  @newspages are pages I don't really wanna read, but I'd rather just have the links

my @newspages = qw(

willwillis

#!/opt/local/bin/perl

use strict;

my $print_to_files = 1;

my $full_roster = '/Users/will/Downloads/221899-2011-03-03.csv';

die "$full_roster does not exist!" unless -e $full_roster;

willwillis

(defun ask-before-closing ()
  "Ask whether or not to close, and then close if y was pressed"
  (interactive)
  (if (y-or-n-p (format "Are you sure you want to exit Emacs? "))
      (if (< emacs-major-version 22)
          (save-buffers-kill-terminal)
        (save-buffers-kill-emacs))
    (message "Canceled exit")))

willwillis

package Website;

use Moose;
use WWW::Mechanize;
use Data::Dumper; # for debugging

our $VERSION = '0.01';

has 'login_url' => (is => 'rw', default => 'https://secure.loginz.com');
has 'user'	=> (is => 'rw', isa => 'Str', required => 1);

willwillis

#!/usr/bin/perl
use Date::Calc qw/:all/;
# 
# posting some more scripts
# from back in the day
# 
# 
my %days_till = (
    Graduation   => Delta_Days( Today(), 2007, 12, 16 ),
    MyLastFinal  => Delta_Days( Today(), 2007, 12, 8 ),