No longer need to no strict 'refs'

diff --git a/examples/C3MethodDispatchOrder.pod b/examples/C3MethodDispatchOrder.pod
index a279e04..0ce9db2 100644 (file)
--- a/examples/C3MethodDispatchOrder.pod
+++ b/examples/C3MethodDispatchOrder.pod
@@ -25,12 +25,8 @@ C3MethodDispatchOrder->meta->add_around_method_modifier('initialize' => sub {
     my $meta = $cont->(@_);
     $meta->add_method('AUTOLOAD' => sub {
         my $meta = $_[0]->meta;
-        my $method_name;
-        {
-            no strict 'refs';
-            my $label = ${ $meta->get_package_symbol('$AUTOLOAD') };
-            $method_name = (split /\:\:/ => $label)[-1];
-        }
+        my $label = ${ $meta->get_package_symbol('$AUTOLOAD') };
+        my $method_name = (split /\:\:/ => $label)[-1];
         my $method = $_find_method->($meta, $method_name);
         (defined $method) || confess "Method ($method_name) not found";
         goto &$method;