X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FConfig%2FAny%2FPerl.pm;h=79cd322223b8bd35092c2f84d39e70cb7d746377;hb=0026ed83b1e0520258a743cb5e69f3d0c2792105;hp=6d214f24930639aa27ead556a4484f315d1d7083;hpb=77bb967eff78126f81c2d60485142a6420d09c4b;p=p5sagit%2FConfig-Any.git diff --git a/lib/Config/Any/Perl.pm b/lib/Config/Any/Perl.pm index 6d214f2..79cd322 100644 --- a/lib/Config/Any/Perl.pm +++ b/lib/Config/Any/Perl.pm @@ -44,8 +44,8 @@ Attempts to load C<$file> as a Perl file. sub load { my $class = shift; my $file = shift; - my $content; - my $exception; + + my( $exception, $content ); { local $@; $content = do $file; @@ -62,7 +62,7 @@ Brian Cassidy Ebricas@cpan.orgE =head1 COPYRIGHT AND LICENSE -Copyright 2006-2009 by Brian Cassidy +Copyright 2006-2011 by Brian Cassidy This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.