syswrite(F,$text,500);

are you handling partial write when you do not have 500 bytes of data in $text? that could cause you problems.

Will perl for money
JJ Knitis
(901) 756-7693
gt8073a@industrialmusic.com