I'll give it a try. I downloaded the newest version of perl and am getting
the same results. This script has been working for the past 3 years on the
same txt files. It wasn't until after upgrading to the Service Pack 6 on
the Windows NT pc's that we had a problem. This script will still
I've attached a sample txt file that I'm using, along with the perl script
and bat that we are running to see if you get the same answer. When you
open up the txt file, you will see the zero's are there. It's not until you
run the script that the zero's are stripped out. When it asks for the
$RECNUM = 0;
$RECCOUNT = 0;
while(! $RS-EOF) {
for ( $i = 0; $i $Count; $i++ )
{
$tmp = $RS-Fields($i)-value;
$tmp =~ s/\s+$//; # trim trailing white space
$amt = $tmp;
# No datachecking here! To
Kathy Wilson wrote:
When last I wrote, I was having trouble with all the zero's dropping out
when going from Service Pack 3 to Service Pack 6 on an Windows NT pc.
I have managed to get the sprintf statement to show the 00 on the right
side, but still having trouble with the zero's