#!/usr/bin/perl

use strict;
use charnames ':full';
 
print "\N{LATIN CAPITAL LETTER A}\n",
      "\N{LATIN SMALL LETTER A}\n";