mirror of
https://github.com/notwa/rc
synced 2024-11-05 18:59:03 -08:00
18 lines
453 B
Text
18 lines
453 B
Text
|
#!/usr/bin/env sh
|
||
|
|
# YES_ZSH
|
||
|
|
# YES_BASH
|
||
|
|
# YES_DASH
|
||
|
|
# YES_ASH
|
||
|
|
|
||
|
|
# TODO: check for existence of grep -P; write a perl-based fallback.
|
||
|
|
grop() { ### @- invoke grep with `-oP`.
|
||
|
|
### **NOTE:** there also exists a grop(1) program provided by
|
||
|
|
### the *grop* package that i don't use.
|
||
|
|
argc $# -ge 1 grop || return
|
||
|
|
grep -oP -- "$@"
|
||
|
|
}
|
||
|
|
|
||
|
|
[ -n "${preload+-}" ] || . ~/sh/preload || exit 2
|
||
|
|
eval ${preload:-preload} argc
|
||
|
|
[ -n "${preload+-}" ] || grop "$@"
|