From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Posted-Date: Wed, 8 Mar 2006 18:03:52 +0200 (EET) X-Sagator-id: 20060308-180347-0001-00203-jEsOif To: "community@altlinux.ru" Date: Wed, 08 Mar 2006 18:06:52 -0000 From: "Aleksander N.Gorohovski" Organization: DonNTU Content-Type: multipart/mixed; boundary=----------GrZ9fhV6905sfCKkqRZ3j3 MIME-Version: 1.0 Message-ID: User-Agent: Opera M2/8.50 (Linux, build 1358) Subject: [Comm] TZ: number 2 RU_string X-BeenThere: community@lists.altlinux.org X-Mailman-Version: 2.1.6 Precedence: list Reply-To: ALT Linux Community List-Id: ALT Linux Community List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Wed, 08 Mar 2006 16:03:55 -0000 Archived-At: List-Archive: List-Post: ------------GrZ9fhV6905sfCKkqRZ3j3 Content-Type: text/plain; format=flowed; delsp=yes; charset=koi8-r Content-Transfer-Encoding: 8bit Доброго времени суток сообщество! Как и обещал (в первую голову Михаилу Шигорину и команде ALT по ТЗ) в атаче perl-сценарий для вывода прописью заданного числа(чисел) на русском языке. Использовать: n2rus [параметры...] Число1 [Число2 ...] Необязательные параметры: -f -m -a (женский,мужской,средний род) -v (выводить исходное число) -n (не выводить завершающий символ ) Ограничение: число(а) должно быть не более 999 999 999 999 И ещё, может кто подскажет, как по грамотному определить текущую кодировку? Хотелось бы приделать вывод результата в нужной кодировке. Буду признателен за конструктивную критику и пожелания. Спасибо. ------------GrZ9fhV6905sfCKkqRZ3j3 Content-Disposition: attachment; filename=n2rus.pl Content-Type: application/octet-stream; name=n2rus.pl Content-Transfer-Encoding: Base64 IyEvdXNyL2Jpbi9wZXJsCgojIPDB0sHNxdTS2ToJLWYgLW0gLWEgKNbFztPLycos zdXW08vPyizT0sXEzsnKINLPxCkKIwkJLXYgKNfZ18/EydTYIMnTyM/Ezs/FIN7J 08zPKQojCQktbiAowsXaINrB18XS28HA3cXHzyDTyc3Xz8zBKQojCQktYz1jcDEy NTEsIC4uLiDX2dfPxCDXIMvPxMnSz9fLxSwgy8HLINcgaWNvbnYgKM7BIMLVxNXd xcUpCgpwcmludCgiVXNhZ2U6IG4ycnVzIFtPUFRJT04uLi5dIE51bWJlcjEgW051 bWJlcjIgLi4uXQpPdXRwdXQgcnVzc2lhbiBzdHJpbmcgb2YgZ2l2ZW4gbnVtYmVy KHMpLiB2MS4wMlxuCiBJbnB1dC9PdXRwdXQgZm9ybWF0IHNwZWNpZmljYXRpb246 CiAgLWYgfCAtbSB8IC1hIFx0XHQgZmFtYWxlLCBtYWxlLCBhdmVyYWdlIHJvZAog IC12IFx0XHRcdCBQcmludCBpbnB1dCBudW1iZXIocykKICAtbiBcdFx0XHQgTm8g cHJpbnQgc3ltYm9sIDxDUj5cbgpPcHRpb25zIGFuZCBudW1iZXIocykgbWF5IGJl IHJhbmRvbSBwb3NpdGlvbmVkLiBNYXggbnVtYmVyIGlzIDk5OSA5OTkgOTk5IDk5 OQpGb3IgYnVnIHJlcG9ydGluZyBpbnN0cnVjdGlvbnMsIHBsZWFzZSB0byBBbGVr c2FuZGVyIE4uR29yb2hvdnNraToKPGFuZ2VsXEBmZWh0LmRndHUuZG9uZXRzay51 YT4uCiIpLGV4aXQgaWYgIUBBUkdWOwoKQFVuMD0oJycsIs/Eyc4iLCLE18EiLCLU 0skiLCLexdTZ0sUiLCLQ0dTYIiwi28XT1NgiLCLTxc3YIiwi18/Txc3YIiwixMXX 0dTYIiwixMXT0dTYIiwKCSLPxMnOzsHEw8HU2CIsIsTXxc7BxMPB1NgiLCLU0snO wcTDwdTYIiwi3sXU2dLOwcTDwdTYIiwi0NHUzsHEw8HU2CIsItvF09TOwcTDwdTY IiwKCSLTxc3OwcTDwdTYIiwi18/Txc3OwcTDwdTYIiwixMXX0dTOwcTDwdTYIik7 CgpAVWY9KCcnLCLPxM7BIiwixNfFIik7CSMg1sXO08vJygpAVW09KCcnLCLPxMnO IiwixNfBIik7CSMgzdXW08vPygpAVWE9KCcnLCLPxM7PIiwixNfBIik7CSMg09LF xM7JygoKQERjbWw9KCcnLCcnLCLE18HEw8HU2CIsItTSycTDwdTYIiwi08/Sz8si LCLQ0dTYxMXT0dQiLCLbxdPU2MTF09HUIiwi08XN2MTF09HUIiwi18/Txc3YxMXT 0dQiLCLExdfRzs/T1M8iKTsKQENlbnQ9KCcnLCLT1M8iLCLE18XT1MkiLCLU0snT 1MEiLCLexdTZ0sXT1MEiLCLQ0dTY08/UIiwi28XT1NjTz9QiLCLTxc3Y08/UIiwi 18/Txc3Y08/UIiwixMXX0dTY08/UIik7CgpAbTE9KCLP1yIsJycsImEiLCLBIiwi wSIsIs/XIiwiz9ciLCLP1yIsIs/XIiwiz9ciKTsKQG0yPSgnJywiYSIsIskiLCLJ IiwiySIpOwpAUHI9KCcnLCLU2dPR3iIsIs3JzMzJz84iLCLNyczMycHSxCIpOwoK IyD109TBzs/Xy8kg0M8g1c3PzN7BzsnACiRmbWE9J20nOwokbj0iXG4iOwojIPDF 0sXP0NLFxMXMxc7JxSDV09TBzs/Xz8sg0MHSwc3F1NLBzckKZm9yKEBBUkdWKXsK ICAgIHB1c2ggQE5zLCRfKzAgaWYgL15cZCskLzsJIyDeydPMzyDEzNEgz8LSwcLP 1MvJCiAgICAkZm1hPSQxIGlmIC9eLShmfG18YSkkLzsJIyDSz8QKICAgICR2PTEg aWYgL14tdiQvOwogICAgJG49JycgaWYgL14tbiQvOwogICAgJGNkPSQxIGlmIC9e LWM9KFx3KykkLzsJIyDLz8TJ0s/Xy8Eg19nXz8TBCn0KCmZvciBteSAkc0EgKEBO cyl7CgogICAgcHJpbnQiJHNBPSIgaWYgJHY7CiAgICBwcmludCgizs/M2CRuIiks bmV4dCBpZiAhICRzQTsKICAgIHByaW50KCI+OTk5OTk5OTk5OTk5JG4iKSxuZXh0 IGlmIGxlbmd0aCgkc0EpPjEyOwogICAgJFVuMFskX109JFVtWyRfXSBmb3IoMSwy KTsKICAgIG15IEBNbD1AbTE7CgogICAgbXkgQHM7CiAgICB3aGlsZShsZW5ndGgo JHNBKT4wKXsKCglteSAkaT1pbnQgbGVuZ3RoKCRzQSkvMzsKCWlmKCRpPDIpewoJ ICAgICRVbjBbJF9dPSRVZlskX10gZm9yKDEsMik7CgkgICAgJE1sWyRfXT0kbTJb JF9dIGZvcigwLi45KTsKCX0KCWlmKGxlbmd0aCgkc0EpPT0xKXskVW4wWyRfXT0k eyJVJGZtYSJ9WyRfXSBmb3IoMSwyKX0KCglpZihsZW5ndGgoJHNBKSUzPT0wKXsJ CQkjIDEwMC4uLi05OTkuLi4KCSAgICAkc0E9fnMvKFxkKShcZCopLyQyLzsKCSAg ICBwdXNoIEBzLCRDZW50WyQxXSBpZiAkMTsKCSAgICBuZXh0Cgl9CglpZihsZW5n dGgoJHNBKSUzPT0yKXsJCQkjIDEwLi4uLTk5Li4uCgkgICAgaWYoJHNBPX4vXjEv KXsJCQkJIyAxMC4uLi0xOS4uLgogICAgCQkkc0E9fnMvKFxkXGQpKFxkKikvJDIv OwogICAgCQlwdXNoIEBzLCRVbjBbJDFdIGlmICQxOwogICAgCQlwdXNoIEBzLCRQ clskaV0uJE1sWzBdOwoJICAgIH1lbHNlewkJCQkJIyAyMC4uLi05OS4uLgogICAg CQkkc0E9fnMvKFxkKShcZCopLyQyLzsKICAgIAkJcHVzaCBAcywkRGNtbFskMV0g aWYgJDE7CgkgICAgfQoJICAgIG5leHQKCX0KCXB1c2goQHMsJFVuMFskc0FdKSxs YXN0IGlmICRzQT1+L14uJC87CgoJaWYobGVuZ3RoKCRzQSklMz09MSl7CQkJIyAx Li4uLTkuLi4KCSAgICAkc0E9fnMvKFxkKShcZCopLyQyLzsKCSAgICBwdXNoIEBz LCRVbjBbJDFdIGlmICQxOwoJICAgIHB1c2ggQHMsJFByWyRpXS4kTWxbJDFdIHVu bGVzcyAkc1stMV09fi9ezS87Cgl9CiAgICB9CiAgICBwcmludCBqb2luKCcgJyxA cyksJG47Cn0KZXhpdDsK ------------GrZ9fhV6905sfCKkqRZ3j3--