develooper Front page | perl.perl5.porters | Postings from July 2009

Is unicore/lib/gc_sc/Digit.pl documented anywhere?

Thread Next
From:
Chas. Owens
Date:
July 25, 2009 11:37
Subject:
Is unicore/lib/gc_sc/Digit.pl documented anywhere?
Message ID:
58ce48dc0907251136q347c5f6et4c4bdc7429617fcc@mail.gmail.com
Is it safe to say

use Unicode::Digits qw/digits_to_int/;

my @digits;
for (split "\n", require "unicore/lib/gc_sc/Digit.pl") {
        my ($s, $e) = map hex, split;
        for (my $ord = $s; $ord <= $e; $ord++) {
                my $chr = chr $ord;
                push @{$digits[digits_to_int $chr]}, $chr;
        }
}

for my $i (0 .. 9) {
        my $re = join '', "[", @{$digits[$i]}, "]";
        $digits[$i] = qr/$re/;
}

Or is unicore/lib/gc_sc/Digit.pl an undocumented feature likely to change?

-- 
Chas. Owens
wonkden.net
The most important skill a programmer can have is the ability to read.

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About