flock( $rpt, LOCK_EX );
# seek($rpt, 0, 2); # found this in PerlIO, didn't help. sysseek broke everything for some reason
syswrite($rpt,$repout,length($repout));
flock( $rpt,  LOCK_UN );