Обсуждение статьи тематического каталога: Перевод числа в пpописной вид (perl)Ссылка на текст статьи: http://www.opennet.me/base/dev/num2text.txt.html
При условии if ($MyN != 0) у меня выдавались слова "триллион миллиард" даже если чило умеет меньше разрядов. В результате сделал
($MyN > 1) - все заработало правильно.