[Moscow.pm] int

[Иван Бессарабов]

Скрипт:
{{{
#! /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", но я все равно сильно удивлен. Это нормально, что скрипт так
работает?