% perl -le 'print 0.3-0.1' 0.2
% perl -le 'print 10.3-10.1' 0.200000000000001
% perl -le '$v = sprintf "%0.1f", 10.3-10.1; print $v' 0.2