From 4e0ac4acb97308b782c39d1137f03a56f635c88f Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?David=20W=C3=BChrer?= <def@gmx.at>
Date: Mon, 3 Jul 2023 15:48:48 +0200
Subject: pivot, strjoin

---
 pivot   | 11 +++++++++++
 strjoin |  6 ++++++
 2 files changed, 17 insertions(+)
 create mode 100755 pivot
 create mode 100755 strjoin

diff --git a/pivot b/pivot
new file mode 100755
index 0000000..3c750f2
--- /dev/null
+++ b/pivot
@@ -0,0 +1,11 @@
+#!/usr/bin/awk -f
+
+{
+	split ($0, _columns, "\t")
+	for (i=0;i<length(_columns);++i) {
+		columns[i] = columns[i] "\t" _columns[i]
+}	}
+END {
+	for (i=0;i<length(columns);++i) {
+		print substr(columns[i],2)
+}	}
diff --git a/strjoin b/strjoin
new file mode 100755
index 0000000..83b2a9c
--- /dev/null
+++ b/strjoin
@@ -0,0 +1,6 @@
+#!/bin/sh
+sep=$1
+shift
+printf '%s' "$1"
+shift
+printf "$sep"'%s' "$@"
-- 
cgit v1.2.3