Select Code to Download

ken@titan ~/tmp/pm_11155205_uni_char_class
$ ls -l *2*
-rw-r--r-- 1 ken None 1275 Oct 29 01:50 PolyUniCharClass2.pm
-rwxr-xr-x 1 ken None  370 Oct 29 01:42 uni_char_class_2.pl

#!/usr/bin/env perl

...
        print @{PolyUniCharClass2::list($cons)}, "\n";
    }
}

package PolyUniCharClass2;

...
}

1;