summaryrefslogtreecommitdiff
path: root/Xerl/Main/Global.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Xerl/Main/Global.pm')
-rw-r--r--Xerl/Main/Global.pm9
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;
}