diff options
Diffstat (limited to 'Xerl/Main/Global.pm')
| -rw-r--r-- | Xerl/Main/Global.pm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/Xerl/Main/Global.pm b/Xerl/Main/Global.pm index bf78ce0..e1a4a44 100644 --- a/Xerl/Main/Global.pm +++ b/Xerl/Main/Global.pm @@ -7,6 +7,11 @@ package Xerl::Main::Global; +use strict; +use warnings; + +use v5.10.0; + sub SHUTDOWN { exit 0; @@ -15,7 +20,7 @@ sub SHUTDOWN { } sub DEBUG { - print 'Debug::', @_, "\n"; + say "Debug::@_"; return undef; } @@ -40,7 +45,7 @@ sub PLAIN { sub REDIRECT ($) { my $location = shift; - print "Status: 301 Moved Permanantly\n"; + say "Status: 301 Moved Permanantly"; print "Location: $location\n\n"; return undef; } |
