Programmieren mit Perl

use charnames

use charnames WIE;
print "\N{CHARSPEC] ist ein lustiges Zeichen";

Dieses lexikalisch beschränkte Pragma aktiviert die Interpolation benannter Zeichen in Strings mit Hilfe der Notation \N{CHARSPEC}:

use charnames ':füll';
print "\N{GREEK SMÄT.T LETTER SIGMA} wird Sigma genannt.\n";

use charnames ':Short';
print "\N{greek:Sigma} ist ein groß geschriebenes Sigma.\n";

use charnames qw(cyrillic greek);
print "\N{sigma} ist das griechische Sigma und \N{be} das kyrillische b.\n";

Das Pragma unterstützt die die WIE-Argumente :füll und :short sowie eigene Script-spezifische Namen.^[229] Das WIE-Argument bestimmt, wie nach dem durch durch CHARSPEC bestimmten Zeichen in \N{CHARSPEC}} gesucht werden soll. Bei :full wird CHARSPEC zuerst in den Unicode-Zeichentabellen ...