Re^2: Increasing a field size for a record

Select or download this

#! perl
use strict;
...
}

untie @lines;

Select or download this

DSE 1232123456 ABCDEF96DS0 20100722 20120827KJHLK LKEDX 058305574 IAC 
+8 S73 WERTYU
DSE 987 ABCDEF96DS0 20100722 20120827KJHLK LKEDX 058305574 IAC 8 S73 W
+ERTYU
DSE 12321234567890 ABCDEF96DS0 20100722 20120827KJHLK LKEDX 058305574 
+IAC 8 S73 WERTYU

Select or download this

DSE 1232123456                                         ABCDEF96DS0 201
+00722 20120827KJHLK LKEDX 058305574 IAC 8 S73 WERTYU
DSE 987                                                ABCDEF96DS0 201
+00722 20120827KJHLK LKEDX 058305574 IAC 8 S73 WERTYU
DSE 12321234567890                                     ABCDEF96DS0 201
+00722 20120827KJHLK LKEDX 058305574 IAC 8 S73 WERTYU

Select Code to Download