--- rxvt-unicode/src/urxvt.pm	2006/01/08 05:52:42	1.56
+++ rxvt-unicode/src/urxvt.pm	2006/01/08 08:43:11	1.57
@@ -473,6 +473,8 @@
                    . (do { local $/; <$fh> })
                    . "\n};\n1";
 
+      $source =~ /(.*)/s and $source = $1; # untaint
+
       eval $source or die "$path: $@";
 
       $pkg