Help for this page

Select Code to Download

Select or download this

#! perl -slw
use strict;
...
}
truncate $file, $lastpos;
close BW;

Select or download this

C:\test>type junk35.dat
0.642375 125 SIL
...
7.478125 125 ???
7.622625 125 ??
7.956125 125 ?