unicode: declare char include data as utf8
authorMischa POSLAWSKY <perl@shiar.org>
Tue, 3 Apr 2012 00:13:09 +0000 (02:13 +0200)
committerMischa POSLAWSKY <perl@shiar.org>
Tue, 10 Apr 2012 01:03:24 +0000 (03:03 +0200)
tools/convert-unicode.pl

index d1f211c..98c8ca7 100755 (executable)
@@ -95,6 +95,7 @@ for my $chr (keys %info) {
 }
 
 # output perl code of hash
+say 'use utf8;';
 say '+{';
 for my $cp (sort keys %info) {
        $info{$cp}->{classstr} = join(' ', sort keys %{ $info{$cp}->{class} });