From 03d827e2fbc409ef97829f25b8eeca5204f81a3c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= <john@ankarstrom.se>
Date: Mon, 12 Jul 2021 13:24:49 +0200
Subject: Re-organize files

---
 child | 27 ---------------------------
 1 file changed, 27 deletions(-)
 delete mode 100755 child

(limited to 'child')

diff --git a/child b/child
deleted file mode 100755
index 32dab60..0000000
--- a/child
+++ /dev/null
@@ -1,27 +0,0 @@
-#!/bin/sh
-
-# child -- print pid of youngest grandchild
-
-opt=
-for x in "$@"; do
-	case "$x" in
-	-*) opt="$opt $x"; shift ;;
-	*) ;;
-	esac
-done
-
-[ $# -ne 1 ] && { echo usage: $0 [-?] pid 1>&2; exit 1; }
-
-ps -do pid,etime,comm -k etime $opt |
-pid=$1 perl -lane '
-	if (/^ *$ENV{pid} / .. 1) {
-		next if /^ *$ENV{pid} /;
-		last if not /[|`-]/;
-		$t = 0; $i = 0;
-		$t += $_*(60**$i++) for reverse split /:/, $F[1];
-		print "$t $_" if $t > 2;
-	}
-' |
-sort -n |
-head -1 |
-cut -d\  -f2
-- 
cgit v1.2.3