From c24b7627020198e3abd79c9752cebc9459fff95e Mon Sep 17 00:00:00 2001 From: xfnw Date: Sun, 4 Feb 2024 10:23:19 -0500 Subject: [PATCH] minix: create --- bin/minix | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100755 bin/minix diff --git a/bin/minix b/bin/minix new file mode 100755 index 0000000..35c6354 --- /dev/null +++ b/bin/minix @@ -0,0 +1,28 @@ +#!/usr/bin/env perl + +$s = 0; +$n = 0; + +while (<>) { + s/^\s*(.*)$/\1/g; + if (m/^\s*$/) { next; } + if ($s) { + if (m/''/) { + s/^([^#]*)\R+$/\1/g; + $s = 0; + } + } else { + if (m/''/) { + $s = 1; + } else { + s/^([^#]*)\R+$/\1/g; + } + if (!$n || m/^,/) { + $n = 1; + } else { + print " "; + } + } + print; +} +print "\n";