diff --git a/jtserv/rmuser.sh b/jtserv/rmuser.sh
new file mode 100755
index 0000000..fdef9c0
--- /dev/null
+++ b/jtserv/rmuser.sh
@@ -0,0 +1,24 @@
+#!/bin/sh
+
+## Feeding CSV as follows:
+##	user
+#	C123456X
+
+DB=${1:-users.sq3}
+CSV=${2:-rmusers.csv}
+if [ ! -f $DB ]; then
+  echo "You need to create user-sqlite3 file first" >&2
+  head $0 >&2; exit
+fi
+sqlite3 ${DB} <<-EOF
+	.mode csv
+	CREATE TEMPORARY TABLE rmuser(user);
+	.import $CSV rmuser
+	DELETE FROM rmuser WHERE user LIKE 'user';	-- rm CSV header
+	select * from rmuser;
+	select count(*) from rmuser;
+	PRAGMA foreign_keys=on;
+	SELECT count(user)||'users found' FROM users;
+	DELETE FROM users WHERE user IN (SELECT user FROM rmuser);
+	SELECT count(user)||'users remain' FROM users;
+EOF