print grep{!/<!DOCTYPE XMLDATA SYSTEM \"artist_royalty\.dtd\">/} @lines;