1diff --git a/Class-Std-0.011/lib/Class/Std.pm b/Class-Std-0.011/lib/Class/Std.pm 2index c64ad8e..baac977 100644 3--- Class-Std-0.011/lib/Class/Std.pm 4+++ Class-Std-0.011/lib/Class/Std.pm 5@@ -519,6 +519,7 @@ sub DESTROY { 6 7 for my $base_class (_hierarchy_of(ref $_[0])) { 8 no strict 'refs'; 9+ no warnings 'once'; 10 if (my $demolish_ref = *{$base_class.'::DEMOLISH'}{CODE}) { 11 &{$demolish_ref}; 12 } 13@@ -613,6 +614,8 @@ use overload ( 14 1; # Magic true value required at end of module 15 __END__ 16 17+=encoding ISO-8859-1 18+ 19 =head1 NAME 20 21 Class::Std - Support for creating standard "inside-out" classes 22