Suppress ‘useless’ warning in overload.pm
authorFather Chrysostomos <sprout@cpan.org>
Mon, 16 Jan 2012 17:32:09 +0000 (09:32 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Mon, 16 Jan 2012 20:51:43 +0000 (12:51 -0800)
lib/overload.pm

index 8af28e5..4892a31 100644 (file)
@@ -20,7 +20,7 @@ our $VERSION = '1.18';
     special             => 'nomethod fallback =',
 );
 
-%ops_seen;
+my %ops_seen;
 for $category (keys %ops) {
     $ops_seen{$_}++ for (split /\s+/, $ops{$category});
 }