Perl

Сегодня столкнулся с необходимостью округления числа в Perl-e. Поспрашивал у знакомых, все рекомендуют ставить модули, а проблему надо решать так как есть. пошарил в и-нете и нашел ответ:

$summ = 8.628;
$summ = sprintf("%.2f",$summ);
# теперь $summ= 8.63

Все предельно просто. :о)