[MacPerl] Prob on G3 with DB_File - Bloated files

[Troy_Davis <Troy_Davis@slipstream.com>]

Hi there,

I ran this script on three machines: A PowerComputing PowerWave 604/120, 
an Apple G3/233, and some strange NT device. The results were comparable 
on the PowerComputing and NT box, about 66k, but the G3 file was 20.7 MB. 
This is with 5.1.9r4 on the macs. NT, I'm not sure. It was the build of 
NT perl needed for DB_File. So, anyway, here's the script:

#-------------------------------------------------------------
#!/usr/bin/perl

use DB_File;

tie %h, "DB_File", "test.db", O_RDWR|O_CREAT, 0640, $DB_HASH
        or die "Cannot open file 'test.db': $!\n";

for $i (0 .. 100)
{
	$h{$i} = $i;
}

untie %h;

exit();
#-------------------------------------------------------------


Any idea what the problem might be?

Thanks,
Troy Davis



_____________________________
Troy Davis
Interactive Director
Mann Bukvic Gatch Partners
205 W. 4th Street
Suite #1130
Cincinnati, Ohio  45202  USA   
http://www.slipstream.com
Tel: (513) 241-4444
Fax: (513) 241-1107


***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch