Skip to content

Instantly share code, notes, and snippets.

@Altreus
Altreus / gist:a2fbc52591181936797e
Created September 7, 2015 17:49
Tampermonkey for ultimate guitar tabs
// ==UserScript==
// @name Ultimate Guitar cleanup
// @version 0.1
// @match http://tabs.ultimate-guitar.com/*
// ==/UserScript==
(function() {
var tab = document.getElementById('cont');
var body = document.body;
while (body.hasChildNodes()) {
$ perl
package An::Object;
use Moose;
has prop => ( is => 'ro' );
package An;
sub Object { 'FakePackage' }
package main;
print An::Object->new( prop => 'prop' )->prop;
@Altreus
Altreus / gist:83c3c7d528d44211df79f332463f8547
Created January 16, 2021 15:33
Result of a rebase workflow
* ff92b519
|\
| * b9c2e03b
| |\
| | * 375de9f6
| |/
| * ca82daa9
| * f7592220
| * 5f16ae36
| * ab666054
multi to-base-alphabet ( Real $num, @alphabet, :$precision = -15 ) is export {
temp @__base-any-digits = @alphabet;
temp $threshold = +@alphabet;
say $threshold;
return convert-arbitrary-base( $num, $threshold, :$precision ); # 137
}
To exit type 'exit' or '^D'
> role X { multi method moo (X:U:) { self.new.moo }; multi method moo (X:D:) { ... } }
(X)
> class A does X {}
===SORRY!=== Error while compiling:
Multi method 'moo' with signature :(X:D: *%_) must be implemented by A because it is required by a role
> role Y { multi method bar (::?CLASS:U:) { self.new.bar }; multi method bar (::?CLASS:D:) { ... } }
(Y)
> class B does Y {}
===SORRY!=== Error while compiling:
--> Working on Dist::Zilla::Plugin::ModuleBuildTiny
Fetching http://www.cpan.org/authors/id/L/LE/LEONT/Dist-Zilla-Plugin-ModuleBuildTiny-0.015.tar.gz
-> OK
Unpacking Dist-Zilla-Plugin-ModuleBuildTiny-0.015.tar.gz
Entering Dist-Zilla-Plugin-ModuleBuildTiny-0.015
Checking configure dependencies from META.json
Checking if you have Module::Build::Tiny 0.034 ... Yes (0.039)
Configuring Dist-Zilla-Plugin-ModuleBuildTiny-0.015
Running Build.PL
Creating new 'Build' script for 'Dist-Zilla-Plugin-ModuleBuildTiny' version '0.015'
174,124,123,34,116,34,58,34,71,85,73,76,68,95,67,82,69,65,84,69,34,44,34,115,34,58,50,44,34,111,112,34,58,48,44,34,100,34,58,123,34,106,111,105,110,101,100,95,97,116,34,58,34,50,48,49,57,45,48,56,45,51,48,84,48,57,58,50,52,58,52,48,46,51,51,51,48,48,48,43,48,48,58,48,48,34,44,34,100,101,115,99,114,105,112,116,105,111,110,34,58,110,117,108,108,44,34,112,114,101,109,105,117,109,95,116,105,101,114,34,58,48,44,34,97,102,107,95,99,104,97,110,110,101,108,95,105,100,34,58,110,117,108,108,44,34,101,109,111,106,105,115,34,58,91,123,34,114,111,108,101,115,34,58,91,93,44,34,114,101,113,117,105,114,101,95,99,111,108,111,110,115,34,58,116,114,117,101,44,34,110,97,109,101,34,58,34,109,115,97,65,121,97,121,97,34,44,34,109,97,110,97,103,101,100,34,58,102,97,108,115,101,44,34,105,100,34,58,34,54,49,54,55,50,48,48,55,53,57,49,52,55,51,57,55,49,51,34,44,34,97,118,97,105,108,97,98,108,101,34,58,116,114,117,101,44,34,97,110,105,109,97,116,101,100,34,58,102,97,108,115,101,125,44,123,34,114,111,108,101,115,34,58,91,93,44,34,114,101
@Altreus
Altreus / flexibase.md
Last active August 2, 2019 17:04
Flexibase RFC

Flexibase

Synopsis

Service-oriented architecture is a scheme by which a system is built out of separate, encapsulated components that communicate as services.

This mirrors the concept of microservices, except where microservices communicate between processes, and often between hosts, SOA services can be installed in-process.

@Altreus
Altreus / .gitconfig
Last active July 18, 2019 16:38
.gitconfig
[user]
email =
name =
signingkey =
[alias]
lg = log --graph --decorate --branches --oneline --remotes --tags --all
qlog = log --graph --decorate --branches --oneline --tags
st = status
co = checkout
ci = commit
method from-json (%json) {
my %constructor = %json<id name icon splash>:kv;
%constructor<is-owner> = %json<owner>;
%constructor<roles> = %(
%json<roles><>.map: { $_<id> => Role.from-json($_) }
);
dd %constructor;