- or download this
#!/usr/bin/perl
...
# delete UNAPPROVED
- or download this
"A1000000" "" "DB50F-LEFT" "DB50F-RIGHT" "" ""
+ "L1:R1 L2:R2 L3:R3 L4:R4 L5:R5 L6:R6 L7:R7"
"M50DFFU" "" "DB50F-LEFT" "DB50F-RIGHT" " 1000000,"
+ "" "L1:R1 L2:R2 L3:R3 L4:R4 L5:R5 L6:R6 L7:R7"
...
"A9999999" "" "DB00F-LEFT" "DB00F-RIGHT" "" ""
+ "L1:R1 L3:R3 L4:R4 L6:R6"
"A9999999" "" "DB00F-LEFT" "DB00F-RIGHT" "" ""
+ "L1:R1 L3:R3 L4:R4 L6:R6"
"A9999999" "" "DB00F-LEFT" "DB00F-RIGHT" "" ""
+ "L1:R1 L3:R3 L4:R4 L6:R6"
- or download this
# for each line, get the part no., compare to contents of
...
}
}