rc/sh/grop

#!/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 "$@"