Скрипт:
{{{
#! /usr/bin/perl
my $a = "19.4016";
print '$a = ' . $a . "\n";
print '$a*10000 = ' . $a*10000 . "\n";
print 'int($a*1000) = ' . int($a*10000) . "\n";
}}}
Результат работы:
{{{
$a = 19.4016
$a*10000 = 194016
int($a*1000) = 194015
}}}
Да, в "perldoc -f int" написано что "machine representations of
floating-point numbers can sometimes produce counterintuitive
results", но я все равно сильно удивлен. Это нормально, что скрипт так
работает?
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
