Perl compare numbers with trailing zero's (after decimal)

Question

I\'m comparing two numbers in perl:

if ($apples + 0 != $fruits->{apples} + 0) {
    print $apples;
    print $fruits->{apples};
    print "\\nApple