Hi, I need to extract data from a text file but the lines wrap at the end which is giving me trouble. Here's an example of the text file;
P1, Q = 0, M = 0, MT = 0, RT_FLAG = 0, RPM = 0, RAD = 0,
ANGLE_TZ = 0, ANGLE_RZ = 0;
E4, LABEL = 'E4', Q = 0, M = 0, MT = 0, RT_FLAG = 0, RPM = 0,
RAD = 0, ANGLE_TZ = 0, ANGLE_RZ = 0;
The order is inconsistent but I think that a semi-colon always indicates the end of a line. Is there a way I can read the line in up to the semi-colon rather than using
foreach line [split [read $input] \n] {blah blah blah}
Thanks
P1, Q = 0, M = 0, MT = 0, RT_FLAG = 0, RPM = 0, RAD = 0,
ANGLE_TZ = 0, ANGLE_RZ = 0;
E4, LABEL = 'E4', Q = 0, M = 0, MT = 0, RT_FLAG = 0, RPM = 0,
RAD = 0, ANGLE_TZ = 0, ANGLE_RZ = 0;
The order is inconsistent but I think that a semi-colon always indicates the end of a line. Is there a way I can read the line in up to the semi-colon rather than using
foreach line [split [read $input] \n] {blah blah blah}
Thanks