use strict; our $LIST = [ { name => q, class => { '%heading' => q"h1|h2|h3|h4|h5|h6", '%list' => q"ul | ol | dir | menu", '%font' => q"tt | b | i ", '%phrase' => q"em | strong | code | samp | kbd | var | cite", '%text' => q"#PCDATA | a | img | br | %phrase | %font", '%block.forms' => q"blockquote | form | isindex", '%preformatted' => q"pre | xmp | listing", '%block' => q"p | %list | dl | %preformatted | %block.forms", '%flow' => q"%text|%block", '%body.content' => q"%heading | %text | %block | hr | address", }, class_misc => { a => q<%A.content>, '%A.content' => q<%heading %text>, pre => q<%pre.content>, '%pre.content' => q<#PCDATA a hr br>, form => q<%body.content>, }, minus => { a => 'a', form => q