I hereby claim:
- I am kugland on github.
- I am kugland (https://keybase.io/kugland) on keybase.
- I have a public key whose fingerprint is 6A62 5E60 E3FF FCAE B3AA 50DC 1DA9 3817 80CD D833
To claim this, I am signing this object:
{ | |
pkgs, | |
lib, | |
... | |
}: let | |
listenHost = "127.0.0.1"; | |
listenPort = 3000; | |
hmac_key = "0mwSVDxp8YhEuPvuxsUCoqhZBDQOys4U"; | |
repo = fetchGit { | |
url = "https://github.com/iv-org/invidious"; |
#!/usr/bin/env bash | |
THIS_SCRIPT="$(realpath "$0")" | |
set -eu -o pipefail | |
build_container() { | |
CONTEXT="$(mktemp -d)" | |
trap 'rm -rf "$CONTEXT"' EXIT | |
sed -nE '/^# INCIPIT DOCKERFILE/,$p' < "$THIS_SCRIPT" > "$CONTEXT/Dockerfile" |
{ pkgs ? import <nixpkgs> { } }: | |
let | |
audiotok = with pkgs.python3Packages; buildPythonPackage rec { | |
pname = "auditok"; | |
version = "0.1.5"; | |
src = fetchPypi { | |
inherit pname version; | |
sha256 = "sha256-HNsw9VLP7XEgs8E2X6p7ygDM47AwWxMYjptipknFig4="; | |
}; | |
propagatedBuildInputs = [ |
#!/usr/bin/env -S perl -CSDA | |
use 5.03; | |
use strict; | |
use warnings; | |
use utf8; | |
use open ':std', ':encoding(UTF-8)'; | |
use URI; | |
use IPC::Open2; |
#!/usr/bin/env -S perl -CSDA | |
# Multiply the time values in a CUE file by a factor. | |
use strict; | |
use warnings; | |
use utf8; | |
use autodie; | |
use Getopt::Long qw(:config posix_default no_ignore_case gnu_compat); |
#!/data/data/com.termux/files/usr/bin/env lua | |
-- Escape a string for use in a shell command | |
local function shell_escape(args) | |
local ret = {} | |
local s | |
for _, a in pairs(args) do | |
s = tostring(a) | |
if s:match("[^A-Za-z0-9_/:=-]") then | |
s = "'" .. s:gsub("'", "'\\''") .. "'" |
# Ellipsizes a path to display it in a limited space. | |
function ellipsize() { | |
(( ${#1} <= 40 )) && { print -r -- $1; return } # If the path is short enough, just return it. | |
local array=(${(s:/:)1}) # Split the path into an array. | |
local head=() tail=() # The head and tail of the path. | |
local prefix='' # '/' if the path is absolute, '' otherwise. | |
[[ ${1[1]} == '/' ]] && prefix='/' # If the path is absolute, set the prefix. | |
local next=tail # The next part of the path to be added. | |
local result # The result. | |
local elm # The current element being processed. |
#!/usr/bin/env python3 | |
# Copyright (C) 2023 Andre Kugland | |
# This script is released under the MIT License. | |
""" | |
sort-by-ext: Sort input lines by extension. | |
Usage: sort-by-ext [-0] |
I hereby claim:
To claim this, I am signing this object:
#!/usr/bin/env -S perl -CSD | |
# Usage: lineinfile <regexp> <new_value> <file1> <file2> <file3> ... | |
use strict; | |
use warnings; | |
use utf8; | |
if (@ARGV < 3) { | |
die "Usage: $0 <regexp> <new_value> <file1> <file2> <file3> ..." |