#!/usr/bin/perl
use strict;
use warnings;

use charnames ':short';
print "\N{greek:Delta} is an upper-case delta.\n";

#page 16

use charnames qw(cyrilic greek);
print "\N{Sigma} and \N{Sigma} are Greek sigmas.\n";
print "\N{BE} and \N{be} are Cyrilic bes.\n";