Skip to content

Instantly share code, notes, and snippets.

Жил-был злой волшебник. Ему было уже лет 500, а может 1000. Когда он
начинал дряхлеть, он находил где-нибудь юную девушку, заточал ее в
башню и много дней подвергал всяческим истязаниям. Из ее страданий он
извлекал жизненную силу, и к моменту, когда жертва погибала, он
становился молодым. Очередной раз одряхлев, он купил на рынке тупую и
некрасивую рабыню. Настолько тупую, что предшествующий владелец,
убедившись, что на нее не действуют даже побои, продавал ее по дешевке
(колдун был жаден, а кроме здоровья и молодости от жертвы ничего не
требовалось).
В своей башне он немедленно приступил к истязанию. Первые дни
iex(14)> defmodule T do
...(14)> def f(fun, arg), do: apply(String, :"#{fun}", [arg])
...(14)> end |> elem(2) |> :beam_lib.chunks([:abstract_code]) |> elem(1) |> elem(1) |> get_in([:abstract_code]) |> elem(1) |> :erl_syntax.form_list |> :erl_prettypr.format |> IO.puts
warning: redefining module T (current version defined in memory)
iex:14
-file("iex", 14).
-module('Elixir.T').
@nwalker
nwalker / run.tpl
Created February 20, 2018 14:09 — forked from hervenicol/run.tpl
`docker inspect` template to regenerate the `docker run` command that created a container
docker run \
--name={{.Name}} \
{{range $e := .Config.Env}}--env={{printf "%q" $e}} \
{{end}}{{range $p, $conf := .NetworkSettings.Ports}}{{with $conf}}-p {{(index $conf 0).HostIp}}:{{(index $conf 0).HostPort}}:{{$p}} \
{{end}}{{end}}{{range $n, $conf := .NetworkSettings.Networks}}{{with $conf}}--network {{printf "%q" $n}} \
{{range $conf.Aliases}}--network-alias {{printf "%q" .}} {{end}} \
{{end}}{{end}}{{range $v := .HostConfig.VolumesFrom}}--volumes-from={{printf "%q" .}} \
{{end}}{{range $v := .HostConfig.Binds}}--volume={{printf "%q" .}} \
{{end}}{{range $l, $v := .Config.Labels}}--label {{printf "%q" $l}}={{printf "%q" $v}} \
{{end}}{{range $v := .HostConfig.CapAdd}}--cap-add {{printf "%q" .}} \
@nwalker
nwalker / longest_pommon_prefix.sql
Created December 1, 2017 12:15
PlPython3 longest common prefix aggregate
drop function lcp_text(text,text) cascade;
create function lcp_text(acc text, b text)
returns text as $$
import itertools as i
if acc is None:
return b
-- it is not generally correct.
-- encoding selection code and segment lengths chosen for our specific transport code.
create or replace function sms_parts(msg text)
returns integer
as $$
import itertools as i, math as m
GSM7 = 1
4> erl_eval:fun_data(fun(#idea{} = Y) when Y#idea.rating > 100 -> Y end).
{fun_data,[],
[{clause,1,
[{match,1,
{tuple,1,
[{atom,1,idea},
{var,1,'_'},
{var,1,'_'},
{var,1,'_'},
{var,1,'_'},
@nwalker
nwalker / vk_unmask.js
Last active September 13, 2017 21:39
function(e, t) {
Object.defineProperty(t, "__esModule", {
value: !0
}),
t.audioUnmaskSource = r;
var n = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMN0PQRSTUVWXYZO123456789+/="
, i = {
v: function(e) {
return e.split("").reverse().join("")
},
import com.fasterxml.jackson.databind.MappingIterator
import com.fasterxml.jackson.dataformat.csv.CsvMapper
import com.fasterxml.jackson.dataformat.csv.CsvParser
//import com.fasterxml.jackson.dataformat.csv.CsvSchema
import java.io.File
import java.util.*
import java.util.function.Consumer
import java.util.stream.Stream
import java.util.stream.StreamSupport
(require '[clojure.string :as str])
(defn parse [str]
(re-seq #"\w+|\n|\s+" str))
(defn decode-item [t]
(condp #(.startsWith %2 %1 0) t
"\n" :newline
" " :delim
t
@nwalker
nwalker / gist:64c9a9b7384b2bda032d3fa353fc3347
Last active January 19, 2017 09:36
3DSecure PARes examples
<ThreeDSecure>
<Message id="e8ada3517761a9503f29e3afe2be56d6">
<PARes id="msg.469297.signed">
<version>1.0.2</version>
<Merchant>
<acqBIN>526571</acqBIN>
<merID>02000000000</merID>
</Merchant>
<Purchase>
<xid>MDAwMDAwMDAwMDEyMzQ1Njc4OTA=</xid>