Nicolas R. atoomic

NAME

Cor — A minimal OO proposal for the Perl core

VERSION

This is version 0.10 of this document.

AUTHOR

1. have a windows 10 pro installation,

ACPs as follows: perl -e "use Win32; print join ' ', Win32::GetConsoleOutputCP(), Win32::GetACP(), Win32::GetOEMCP()"
437 1252 437 (that means it is set to use usa language as default)

2. install strawberry perl

http://strawberryperl.com/download/5.28.0.1/strawberry-perl-5.28.0.1-64bit.msi
to c:\strawberry

3. in c:\strawberry\smoke run configsmoke

accept defaults, except:

Google Public NTP [AS15169]:

time.google.com

time1.google.com

time2.google.com

time3.google.com

Default

Powerlevel10k

Each of these commands will run an ad hoc http static server in your current (or specified) directory, available at http://localhost:8000. Use this power wisely.

Discussion on reddit.

Python 2.x

$ python -m SimpleHTTPServer 8000

tmux cheatsheet

As configured in my dotfiles.

start new:

tmux

start new with session name:

	#!/usr/bin/env perl

	use strict;
	use warnings;

	use v5.20;
	use feature qw(signatures);
	no warnings qw(experimental::signatures);

	require Dumbbench; # use() causes breakage w/ perlcc.

	#!/bin/sh

	# Enable and disable HDMI output on the Raspberry Pi

	is_off ()
	{
	tvservice -s \| grep "TV is off" >/dev/null
	}

	case $1 in

	#!/bin/sh
	#
	# Use posixregex CLI tool from: https://github.com/syzdek/dmstools/blob/master/src/posixregex.c

	RE_IPV4="((25[0-5]\|(2[0-4]\|1{0,1}[0-9]){0,1}[0-9])\.){3,3}(25[0-5]\|(2[0-4]\|1{0,1}[0-9]){0,1}[0-9])"

	posixregex -r "^(${RE_IPV4})$" \
	127.0.0.1 \
	10.0.0.1 \
	192.168.1.1 \

	#!/usr/bin/perl
	use v5.14;
	use strict;
	use warnings;

	use PPI;
	use Scalar::Util qw(blessed);


	# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #