#!/usr/bin/perl use strict; use charnames ':full'; print "\N{LATIN CAPITAL LETTER N}", "\N{DEGREE SIGN}\n";