diff --git a/Netdisco/bin/netdisco-daemon b/Netdisco/bin/netdisco-daemon
index 2c5a6cdf..fde44ba4 100755
--- a/Netdisco/bin/netdisco-daemon
+++ b/Netdisco/bin/netdisco-daemon
@@ -1,5 +1,11 @@
 #!/usr/bin/env perl
 
+# fix for older Perl which warns about a bug in File::Slurp
+BEGIN {
+  no warnings 'portable';
+  use File::Slurp;
+}
+
 use FindBin;
 use lib "$FindBin::Bin/../lib";
 use App::Netdisco;