ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (Perl) Округление
7 сообщений из 7, страница 1 из 1
(Perl) Округление
    #33098288
Partos
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Partos
Участник
Здраствуйте.


Подскажите плиз как округлить число в Perl по особому условию:

БД возвращает число формата: ,5
Требуется преобразовать это число к формату: 0,5

При этом если БД вернула число 3 то оно должно быть отражено так же...тоесть все незначащие нули кроме того что перед запятой надо обрезать...

Копался, копался я в sprintf но так и не понял как это сделать....с Си не знаком а везде где натыкался говорят "эта функция работает так же как в Си..."..в результате толком параметров spintf так и не нашёл

Подскажите плиз
...
Рейтинг: 0 / 0
02.06.2005, 19:13
| Ответить | Цитировать | Написать  
(Perl) Округление
    #33098408
g613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
g613
Участник
PartosЗдраствуйте.


Подскажите плиз как округлить число в Perl по особому условию:

БД возвращает число формата: ,5
Требуется преобразовать это число к формату: 0,5

При этом если БД вернула число 3 то оно должно быть отражено так же...тоесть все незначащие нули кроме того что перед запятой надо обрезать...


...вообще это таки уже не округление а скорее преобразование....

если грубо то:

Код: plaintext
1.
2.
3.
$num = ',5';
$num =~ s#^,#.#;
printf "%.2f\n", $num;

если хочеш без ~s###, теоретически должно помочь выставление правильной локали
( гдето в районе LC_NUMERIC )...



Копался, копался я в sprintf но так и не понял как это сделать....с Си не знаком а везде где натыкался говорят "эта функция работает так же как в Си..."..в результате толком параметров spintf так и не нашёл

Подскажите плиз

perldoc -f sprintf

?
...
Рейтинг: 0 / 0
02.06.2005, 21:17
| Ответить | Цитировать | Написать  
(Perl) Округление
    #33099934
Фотография Хрен
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Хрен
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
 
$>perl
$a=. 5 ;
print $a

 0 . 5

что то недопонял вопрос. вроде и так преобразует
...
Рейтинг: 0 / 0
03.06.2005, 14:50
| Ответить | Цитировать | Написать  
(Perl) Округление
    #33099957
Фотография Black
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Black
Участник
там ЗАПЯТАЯ, а не ТОЧКА :)
...
Рейтинг: 0 / 0
03.06.2005, 14:59
| Ответить | Цитировать | Написать  
(Perl) Округление
    #33100293
Фотография Хрен
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Хрен
Участник
и никак не поменять??? какой ужас

PS. кричать не обязательно, я различаю точки и запятые. Всего-то операция в одно действие - замени запятую на точку(подсказать как?) и сложи с 0 , чтобы сменить контекст. Bыведет с тем числом нулей впереди с каким полагается.
...
Рейтинг: 0 / 0
03.06.2005, 16:27
| Ответить | Цитировать | Написать  
(Perl) Округление
    #33100305
Фотография Black
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Black
Участник
уважаемый, я не кричал, а выделил текст (надо было конечно использовать стили) + в конце добавил смайлик ...
...
Рейтинг: 0 / 0
03.06.2005, 16:31
| Ответить | Цитировать | Написать  
(Perl) Округление
    #33100806
Фотография Хрен
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Хрен
Участник
не сердитесь. просто большие буквы - это общепризнанный знак повышенного голоса
...
Рейтинг: 0 / 0
03.06.2005, 22:15
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (Perl) Округление
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=23&msg=33100305&tid=1478163]:
 0ms
get settings:
 9ms
get forum list:
 20ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 157ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 57ms
get tp. blocked users:
 1ms
others: 201ms
total:  466ms
созд. / загр.: 466ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]