Add support for -bnx 'regex'

VR-25 · Jun 24, 2022 · e667f34 · e667f34
1 parent b1d3484
commit e667f34
Showing 1 changed file with 12 additions and 1 deletion.
diff --git a/tarb.sh b/tarb.sh
@@ -55,11 +55,22 @@ app_r() {
 
 
 backup() {
+  local one=
+  local regex=
+  local x=v
   if flag c; then
     shift
     cust $*
   else
-    lspkg "$@" > $_LINES
+    if flag n; then
+      one=$1
+      shift
+      regex="$(echo "$@" | sed 's/,/|/g')"
+      flag x && regex="${regex:-^//$}" || { x=; regex="${regex:-.}"; }
+      lspkg $one | grep -E$x "$regex" > $_LINES
+    else
+      lspkg "$@" > $_LINES
+    fi
     bkp
   fi
 }