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> ..." |