diff options
| author | Karl Williamson <public@khwilliamson.com> | 2011-11-06 16:15:25 -0700 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2011-11-08 08:09:37 -0700 |
| commit | 403e46020ffed21f91ca91fc900e95e300bbee52 (patch) | |
| tree | 3ec38f07ebdf42d6668bb801f13d1362e8a73614 /lib | |
| parent | ea5acc0ff69cde3bfc8ddba98999850e9d48c576 (diff) | |
| download | perl-403e46020ffed21f91ca91fc900e95e300bbee52.tar.gz | |
Unicode::UCD.pm: Localize $_, $/
So that they don't affect code outside the module and vice-versa.
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Unicode/UCD.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/Unicode/UCD.pm b/lib/Unicode/UCD.pm index bf5e91b902..af1391ab51 100644 --- a/lib/Unicode/UCD.pm +++ b/lib/Unicode/UCD.pm @@ -8,6 +8,9 @@ use Unicode::Normalize qw(getCombinClass NFD); our $VERSION = '0.37'; +local $_; +local $/ = "\n"; + use Storable qw(dclone); require Exporter; |