[Tech] mi sfugge il perl

[paolo palmerini]

mi scuso in anticipo, è sicuramente una domanda scema, ma chi avesse
compassione di un poveraccio che non riesce a vedere la luce accesa
davanti al suo naso, potrebbe aiutarmi  capire perchè questo pezzetto di
codice perl:

---------------------------------------------------------------------------------
#!/usr/bin/perl

$a = 1.1;
$b = 0.1;
$diff = 1.;
$sum  = 1.2;

$c = $a + $b;

if ($sum != $c) {
        print "Sum error: $c != $sum\n";
} else {
        print "Sum is ok\n";
}

$c = $a - $b;

if ($diff != $c) {
        print "Difference error: $c != $diff\n";
} else {
        print "Difference is ok\n";
}
----------------------------------------------------------------------------------

mi da questo risultato:

[paolo@pondy] ./p.pl
Sum error: 1.2 != 1.2
Difference is ok
[paolo@pondy]

lo so, lo so, la soluzione è davanti al mio naso ma non la vedo!!
grazie in anticipo
p.

-- 
me, myself... [http://www.palmerini.org]
...and my podcast
[http://www.palmerini.org/podkasbaht]