s/WORKING -STORAGE SECTION./DECLARE;/;
print targetfile $line, "\n";