--- xdg-screensaver.in.before	2016-01-05 12:20:00.052171620 -0500
+++ xdg-screensaver.in	2016-01-05 12:21:23.773318212 -0500
@@ -448,7 +448,7 @@
 # http://people.gnome.org/~mccann/gnome-screensaver/docs/gnome-screensaver.html
     case "$1" in
         suspend)
-        perl -e '
+        /usr/bin/perl -e '
 use strict;
 use warnings;
 use IO::File;