bin/grepc: Use <() instead of $()

Files are simpler to handle.  It results in less flags, and simpler
command invocations.  And it allows breaking the line more nicely,
without having to break in the middle of a quoted region.

Signed-off-by: Alejandro Colomar <alx@kernel.org>

diff --git a/bin/grepc b/bin/grepc
index b8d3cde3f84719ac44217c0ea9c1cb5d2e603ed3..6d9c79b7887fcb05bcb1f950c5018cbbf1a83d40 100755 (executable)
--- a/bin/grepc
+++ b/bin/grepc
@@ -237,7 +237,11 @@ else
        fi \
        | xargs pcre2grep "${opts[@]}" -f "$patterns";
 fi \
-| perl -pe "$(test "$r" = 'yes' && printf '%s\n' 's/('"$identifier"')/\033[32m\1\033[0m/' || printf '%s\n' 's///')" \
+| perl -p <(
+       test "$r" = 'yes' \
+       && printf '%s\n' 's/('"$identifier"')/\033[32m\1\033[0m/' \
+       || printf '%s\n' 's///';
+) \
 | if [ -n "$l" ]; then
        sort \
        | uniq;