utt/nawszelkiwypadek/tools/gue_dic/makeLabels.pl

12 lines
376 B
Perl
Executable File

#!/usr/bin/perl
use locale;
print "lcase a ± b c æ d e ê f g h i j k l ³ m n ñ o ó p q r s ¶ t u v w x y z ¼ ¿ é ö ü ä\n";
print "ucase A ¡ B C Æ D E Ê F G H I J K L £ M N Ñ O Ó P Q R S ¦ T U V W X Y Z ¬ ¯\n";
print "letter lcase ucase\n";
print "digit 0 1 2 3 4 5 6 7 8 9\n";
print "signs , . @ \/ \' _\n";
print "sem ~ ; - \\ \n";
print "all letter digit signs sem\n";