I have a perl program that is taking some information and creating a pdf file using pdf::api2. I want it to start at 7.125 inches from the bottom and then print information on each line subtracting .125 from 7.125 until it gets to 1 inch. I can't get it to subract .125 from the 7.125. The code below works but it is subtracting 1. If i use $i-.125 it just keeps running the loop. Any suggestions to get it to subract .125 from $i ? If I print the output to the command prompt using print "$i\n" it keeps saying 7.125 Thanks for any help.
for (my $i=7.125; $i>=1; $i--)
{
$details->font($font,9);
$details->fillcolor('black');
$details->translate(.5/in, $i/in);
$details->text("1234567890");
}
for (my $i=7.125; $i>=1; $i--)
{
$details->font($font,9);
$details->fillcolor('black');
$details->translate(.5/in, $i/in);
$details->text("1234567890");
}