--- deliantra/server/lib/cf.pm	2010/05/02 19:16:16	1.537
+++ deliantra/server/lib/cf.pm	2010/05/04 21:45:43	1.538
@@ -1425,7 +1425,7 @@
             if $source =~ /\A#!.*?perl.*?#\s*(.*)$/m;
 
          $ext{source} =
-            "package $pkg; use 5.10.0; use strict 'vars', 'subs'; use utf8;\n"
+            "package $pkg; use common::sense;\n"
             . "#line 1 \"$path\"\n{\n"
             . $source
             . "\n};\n1";
@@ -1453,6 +1453,7 @@
 
             if (length $@) {
                error "$v->{path}: $@\n";
+               undef $@; # work around perl 5.10.0 utf-8 caching bug
 
                cf::cleanup "mandatory extension '$k' failed to load, exiting."
                   if exists $v->{meta}{mandatory};