The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка  RSS
"в Перл отрезать пару символов после запятой"
Вариант для распечатки Архивированная нить - только для чтения! 
Пред. тема | След. тема 
Форумы OpenNET: Виртуальная конференция (Public)
Изначальное сообщение [Проследить за развитием треда]

"в Перл отрезать пару символов после запятой"
Сообщение от StasV emailИскать по авторуВ закладки(??) on 14-Май-04, 23:26  (MSK)
Забыл как в Перл отрезать пару символов после запятой.
есть: 7.22642807983482
надо сделать: 7,22
  Рекомендовать в FAQ | Cообщить модератору | Наверх

 Оглавление

Индекс форумов | Темы | Пред. тема | След. тема
Сообщения по теме

1. "в Перл отрезать пару символов после запятой"
Сообщение от Вася Искать по авторуВ закладки on 15-Май-04, 13:20  (MSK)
>Забыл как в Перл отрезать пару символов после запятой.
>есть: 7.22642807983482
>надо сделать: 7,22
sprintf юзай
например:

$d=7.22642807983482;
$dn=sprintf('%.2f',$d);
print $dn;

'%.2f' 2 - это требуемое кол-во знаков после запятой после округления числа, ставишь требуемое значение.
Удачи.

  Рекомендовать в FAQ | Cообщить модератору | Наверх

2. "в Перл отрезать пару символов после запятой"
Сообщение от StasV emailИскать по авторуВ закладки(??) on 15-Май-04, 13:41  (MSK)
Так отлично :) Спасибо, только как сделать чтобы не округлялось?
Нужно именно не округлить, а просто отсечь.
Заранее Вам спасибо.
  Рекомендовать в FAQ | Cообщить модератору | Наверх

3. "в Перл отрезать пару символов после запятой"
Сообщение от Асен Тотин emailИскать по авторуВ закладки on 15-Май-04, 22:15  (MSK)
Привет,

Дешево и сердито:

$d=7.22642807983482;
$d = (int($d*100))/100;

Если нужно другое количество знаков, меняеш число 100...

WWell,

  Рекомендовать в FAQ | Cообщить модератору | Наверх

4. "в Перл отрезать пару символов после запятой"
Сообщение от Асен Тотин emailИскать по авторуВ закладки on 15-Май-04, 22:17  (MSK)
... Хотя можно и чуть умнее, например:

$d=7.22642807983482;
@dd = split (/\./,$d);
$dd[1] = (int($dd[1]*100))/100;
$d = "$dd[0].$dd[1]";

WWell,

  Рекомендовать в FAQ | Cообщить модератору | Наверх

5. "в Перл отрезать пару символов после запятой"
Сообщение от StasV emailИскать по авторуВ закладки(??) on 16-Май-04, 01:26  (MSK)
>Привет,
>
>Дешево и сердито:
>
>$d=7.22642807983482;
>$d = (int($d*100))/100;
>
Этот пример подошел, спасибо, а следующий нет :)

  Рекомендовать в FAQ | Cообщить модератору | Наверх


Удалить

Индекс форумов | Темы | Пред. тема | След. тема
Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2024 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру