oguz-ismail

# https://stackoverflow.com/q/65964916
# Usage: awk -v limit=17577 -f prog.awk file

BEGIN {
  RS = ORS = ","
}

{
  nread++
}

oguz-ismail

#!/bin/bash -
gen_sfx()
  case $ext in
  (/*|*//*|*/)
    printf '%q: %q: Invalid specifier\n' "$0" "$ext" >&2
    exit 3 ;;
  (*/*)
    local - IFS=/

    set -f

oguz-ismail

LC_ALL=C

case $1 in
''|[!0-9]*|[!0]*[!0-9]*|0[!0-7Xx]*|0[Xx]|0[!Xx]*[!0-7]*|0[Xx]*[!0-9A-Fa-f]*)
  printf '%s: invalid number: %s\n' "$0" "$1" >&2
  exit 1
esac

x=$(($1)) bx=
while test $x -gt 0; do

oguz-ismail

def tree($pre; $in):
  def root($pre; $in):
    def branch($pre; $in):
      $in | if has(0) then
        (index($pre[0]) + 1) as $i | {
          l: root($pre[:$i]; .[:$i]),
          r: root($pre[$i:]; .[$i:])
        }
      else
        {l: {}, r: {}}

oguz-ismail

BEGIN {
  FS = ": "
}

$1 == "Package" {
  pkg = $2
  tab[pkg][""]
}

$1 == "Status" {

oguz-ismail

{
	item[NR] = $0
	itemw[NR] = length
}

END {
	if (NR == 0)
		exit

	if (width == 0)

oguz-ismail

printf '%s\n' "$@" \
| awk '
{
	sub(/boards\.4chan(nel)?/, "a.4cdn")
	print "url=" $0 ".json"
}
' \
| curl -sS -K - -w '"%{url}"' \
| jq -nr '
def url($board):

oguz-ismail

err_usage() {
	printf 'Usage: %s [-l] [-n name] [-c comment] image\n' "$0" >&2
	exit 1
}

name=Custom
comment=
light_theme=0

while getopts :n:c:l opt; do

oguz-ismail

#include <errno.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#ifndef STACK_SIZE_MAX
#define STACK_SIZE_MAX 1000
#endif

double stack[STACK_SIZE_MAX];

oguz-ismail

err_usage() {
	printf 'Usage: %s [-c columns] [-o outfile] image image...\n' "$0" >&2
	exit 1
}

columns=0
out_file=images.jpg

while getopts :c:o: opt; do
	case $opt in