$content =~ s/^(?!KEEP).*$//mg;	# clear lines not starting with KEEP