quote - strict+warnings, golfed a little better

git-svn-id: https://jules.scsys.co.uk/repository/shadowcat-code/scratchpad/matthewt/sig/lib@604 8a6f57db-631f-0410-b083-dc7c4259d016

diff --git a/quotefile b/quotefile
index 266be9a..865aeff 100644 (file)
--- a/quotefile
+++ b/quotefile
@@ -1479,5 +1479,5 @@ Any other suggestions?                             -- lucasomon.blogspot.com
 <@sungo> I put a bible onto an microsd card just so I could shove it up 
          my ass and poop it back out
 %
-$^H |= 0x00000602;
-${^WARNING_BITS} |= "\377\377\377\377\377\377\377\377\377\377\377?";
+use strict; use warnings FATAL => 'all';
+BEGIN { $^H |= 0x602; ${^WARNING_BITS} |= ("\xff"x11)."?" }