#!/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";