4 use warnings FATAL => 'all';
114 my ($class, @rest) = @_;
115 my $opts = ref($rest[0]) eq 'HASH' ? shift(@rest) : {};
116 ($opts->{into_level}||=1)++;
117 XML::Tags->import($opts, @HTML_TAGS, @rest);
120 sub to_html_string { XML::Tags::to_xml_string(@_) }