From f8578219687f65e2e7be362ac3e3ad2692816b45 Mon Sep 17 00:00:00 2001
From: Cem Keylan <cem@ckyln.com>
Date: Fri, 25 Dec 2020 02:36:00 +0300
Subject: perl: use POSIX operations on 'find(1)'

---
 extra/perl/build | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

(limited to 'extra/perl/build')

diff --git a/extra/perl/build b/extra/perl/build
index a81dc976..75b09a56 100755
--- a/extra/perl/build
+++ b/extra/perl/build
@@ -31,13 +31,14 @@ make
 make DESTDIR="$1" install
 
 # Remove all unneeded files.
-find "$1" -name \*.pod       -delete
-find "$1" -name .packlist    -delete
-find "$1" -name README\*     -delete
-find "$1" -name TODO\*       -delete
-find "$1" -name Change\*     -delete
-find "$1" -name \*.bs        -delete
-find "$1" -name \*.0 -type f -delete
+find "$1" \( \
+    -name '*.pod'   -o \
+    -name .packlist -o \
+    -name README\*  -o \
+    -name TODO\*    -o \
+    -name Change\*  -o \
+    -name \*.bs     -o \
+    -name \*.0 \) -type f -exec rm -f -- {} +
 
 # Fix permissions.
 find "$1/usr/lib" -type f -exec chmod 644 {} \;
-- 
cgit v1.2.3