++ed by:
Author image Vladislav Safronov


Lingua::RU::Number - Converts numbers to money sum in words (in Russian roubles) and numbers (int) to words.


  use Lingua::RU::Number qw(rur_in_words num2words);

  print rur_in_words(1.01), "\n"; 
  # outputs "один рубль одна копейка"
  print num2words(32), "\n"; 
  # outputs "тридцать два"
  print num2words(32, 1), " зуба \n"; 
  # outputs "тридцать два зуба"
  print num2words(21, 2), " очко \n"; 
  # outputs "двадцать одно очко"


Lingua::RU::Number::rur_in_words() helps you convert a number to money sum in words. Given a number, rur_in_words() returns it as money sum in words, e.g.: 1.01 converted to один рубль одна копейка, 2.22 converted to два рубля двадцать две копейки. The target charset is UTF-8.

num2words( $number, $gender ) translates a number (integer) to text in russian, using the specified gender. $gender 0|1|2 - feminine, masculine and neutral respectively. Masculine by default. Returns Unicode string.




Vladislav Safronov, <vlad at yandex.ru>

num2words() code borrowed from Lingua::RU::Num2Word by Richard C. Jelinek <info@petamem.com>, https://github.com/regru/lingua-ru-num2word/blob/master/lib/Lingua/RU/Num2Word.pm


Copyright (C) 2002-2015 by Vladislav Safronov.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.1 or, at your option, any later version of Perl 5 you may have available.

This program is distributed in the hope that it will be useful, but without any warranty; without even the implied warranty of merchantability or fitness for a particular purpose.