diff --git a/valgrind-3.21.0-callgrind_control-no-strict.patch b/valgrind-3.21.0-callgrind_control-no-strict.patch
new file mode 100644
index 0000000..2aaecd4
--- /dev/null
+++ b/valgrind-3.21.0-callgrind_control-no-strict.patch
@@ -0,0 +1,12 @@
+diff --git a/callgrind/callgrind_control.in b/callgrind/callgrind_control.in
+index 083ffa29f..eb50c16ad 100644
+--- a/callgrind/callgrind_control.in
++++ b/callgrind/callgrind_control.in
+@@ -22,7 +22,6 @@
+ #  You should have received a copy of the GNU General Public License
+ #  along with this program; if not, see <http://www.gnu.org/licenses/>.
+ 
+-use strict;
+ use warnings;
+ 
+ use File::Basename;
diff --git a/valgrind.spec b/valgrind.spec
index 72e590c..83c2e69 100644
--- a/valgrind.spec
+++ b/valgrind.spec
@@ -95,6 +95,10 @@ Patch6: valgrind-3.21.0-Add-with-gdbscripts-dir.patch
 # https://bugs.kde.org/show_bug.cgi?id=460192
 Patch7: valgrind-3.21.0-epoll_pwait2.patch
 
+# Can't run callgrind_control with valgrind 3.21.0 because of perl errors
+# https://bugs.kde.org/show_bug.cgi?id=470121
+Patch8: valgrind-3.21.0-callgrind_control-no-strict.patch
+
 BuildRequires: make
 BuildRequires: glibc-devel
 
@@ -235,6 +239,7 @@ Valgrind User Manual for details.
 %patch5 -p1
 %patch6 -p1
 %patch7 -p1
+%patch8 -p1
 
 
 %build
@@ -468,6 +473,9 @@ fi
 %endif
 
 %changelog
+* Thu Jun  1 2023 Mark Wielaard <mjw@fedoraproject.org>
+- Add valgrind-3.21.0-callgrind_control-no-strict.patch
+
 * Tue May 30 2023 Mark Wielaard <mjw@fedoraproject.org> - 3.21.0-5
 - Update valgrind-3.21.0-no-memcpy-replace-check.patch (memcpy_chk)