Newline's creep in, while using Tie::File

Select or download this

 NODE              32        0.00000        0.00000       -1.90000
 NODE              33        0.00000        0.00000       -5.50000
...
 BEAM              35        36       35        1        5       1
 BEAM              36        37       36        1        4       1

Select or download this

use Tie::File;
my @records;
...

close(IN);

Select or download this


 NODE              32        0.00000        0.00000       -1.90000
...
 NODE              42        0.00000        0.00000      -62.90000

Select or download this

 

 NODE              32        0.00000        0.00000       -1.90000
...

 NODE              42        0.00000        0.00000      -62.90000

Select Code to Download