diff options
author | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2017-12-28 15:14:48 +0000 |
---|---|---|
committer | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2017-12-28 15:14:48 +0000 |
commit | 355c3ab756cb5e5a562d9172ca66afcebe30a822 (patch) | |
tree | 00c6cd8510569af1e185a6a4de152af1ac4715e6 /lib/Unicode | |
parent | 842799930406c2bba389669d64a83783c138ab8f (diff) | |
download | perl-355c3ab756cb5e5a562d9172ca66afcebe30a822.tar.gz |
Fix typo in POD for new Unicode::UCD::num() variant
Diffstat (limited to 'lib/Unicode')
-rw-r--r-- | lib/Unicode/UCD.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Unicode/UCD.pm b/lib/Unicode/UCD.pm index cd54e2ea50..2021680987 100644 --- a/lib/Unicode/UCD.pm +++ b/lib/Unicode/UCD.pm @@ -1865,7 +1865,7 @@ sub _numeric { my $val = num("123"); my $one_quarter = num("\N{VULGAR FRACTION 1/4}"); - my ($val = num("12a", \$valid_length); # $valid_length contains 2 + my $val = num("12a", \$valid_length); # $valid_length contains 2 C<num()> returns the numeric value of the input Unicode string; or C<undef> if it doesn't think the entire string has a completely valid, safe numeric value. |