数字转为说法，Perl脚本及结果