[svn:mod_parrot] r351 - in mod_parrot/trunk: eg/perl6/ModPerl6 languages/perl6/lib languages/perl6/lib/ModPerl6

[jhorwitz@xxxxxxxxxxxx]

Author: jhorwitz
Date: Mon Jun 16 08:53:44 2008
New Revision: 351

Modified:
   mod_parrot/trunk/eg/perl6/ModPerl6/Counter.pm
   mod_parrot/trunk/eg/perl6/ModPerl6/Polly.pm
   mod_parrot/trunk/languages/perl6/lib/ModPerl6/Registry.pm
   mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm

Log:
enforce perl 6 usage with "use v6"


Modified: mod_parrot/trunk/eg/perl6/ModPerl6/Counter.pm
==============================================================================
--- mod_parrot/trunk/eg/perl6/ModPerl6/Counter.pm       (original)
+++ mod_parrot/trunk/eg/perl6/ModPerl6/Counter.pm       Mon Jun 16 08:53:44 2008
@@ -23,6 +23,8 @@
 
 module ModPerl6::Counter;
 
+use v6;
+
 sub handler($r)
 {
     our $x;

Modified: mod_parrot/trunk/eg/perl6/ModPerl6/Polly.pm
==============================================================================
--- mod_parrot/trunk/eg/perl6/ModPerl6/Polly.pm (original)
+++ mod_parrot/trunk/eg/perl6/ModPerl6/Polly.pm Mon Jun 16 08:53:44 2008
@@ -20,6 +20,8 @@
 
 module ModPerl6::Polly;
 
+use v6;
+
 sub handler($r)
 {
     my $text = $r.args();

Modified: mod_parrot/trunk/languages/perl6/lib/ModPerl6/Registry.pm
==============================================================================
--- mod_parrot/trunk/languages/perl6/lib/ModPerl6/Registry.pm   (original)
+++ mod_parrot/trunk/languages/perl6/lib/ModPerl6/Registry.pm   Mon Jun 16 
08:53:44 2008
@@ -2,6 +2,8 @@
 
 module ModPerl6::Registry;
 
+use v6;
+
 our %registry;
 
 sub gen_module_name($path)

Modified: mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm
==============================================================================
--- mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm   (original)
+++ mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm   Mon Jun 16 08:53:44 2008
@@ -16,6 +16,8 @@
 
 module ModParrot::HLL::perl6;
 
+use v6;
+
 our %loaded_modules;
 
 sub load($handler)