Subject: | bug that treats float like integer |
I am using:
Format.pm version 0.53 with Perl 5.8.6 with Gentoo kernel 2.6.12-r10. The code that will show the bug is:
$format_obj = Fortran::Format->new("4(F9.4,1X),I2,1X,F9.4");
# next line is a work around
#$format_obj = Fortran::Format->new("4(F9.4,1X),1(I2,1X),F9.4");
print OUTPUT sprintf($format_obj->write($arg1, $arg2, $arg3, $arg4, $arg5, $arg6));
arg6 is printed as an integer instead of F9.4 (its usual value is 1.1008, but it prints 1)