From 2e136ef41939e169688138665446f0dcb3cef87f Mon Sep 17 00:00:00 2001
From: Jonathan Kans <kans@ncbi.nlm.nih.gov>
Date: Sun, 31 Aug 2014 18:35:50 +0000
Subject: [PATCH] initial checkin of helper scripts

git-svn-id: https://svn.ncbi.nlm.nih.gov/repos/toolkit/trunk/internal/scripts/edirect@445115 470b1a5d-c923-0410-adfa-dd7f1cf1b600
---
 join-into-groups-of  | 3 +++
 sort-uniq-count-rank | 5 +++++
 word-at-a-time       | 4 ++++
 3 files changed, 12 insertions(+)
 create mode 100755 join-into-groups-of
 create mode 100755 sort-uniq-count-rank
 create mode 100755 word-at-a-time

diff --git a/join-into-groups-of b/join-into-groups-of
new file mode 100755
index 0000000..22bb6c4
--- /dev/null
+++ b/join-into-groups-of
@@ -0,0 +1,3 @@
+#!/bin/sh
+xargs -n "$@" echo |
+sed 's/ /,/g'
diff --git a/sort-uniq-count-rank b/sort-uniq-count-rank
new file mode 100755
index 0000000..d4d9776
--- /dev/null
+++ b/sort-uniq-count-rank
@@ -0,0 +1,5 @@
+#!/bin/sh
+sort -f |
+uniq -i -c |
+perl -pe 's/\s*(\d+)\s(.+)/$1\t$2/' |
+sort -t '	' -k 1,1nr -k 2f
diff --git a/word-at-a-time b/word-at-a-time
new file mode 100755
index 0000000..214f92d
--- /dev/null
+++ b/word-at-a-time
@@ -0,0 +1,4 @@
+#!/bin/sh
+sed 's/[^a-zA-Z0-9]/ /g' |
+tr 'A-Z' 'a-z' |
+xargs -n 1