Chip 2000 May

home *** CD-ROM | disk | FTP | other *** search

/ Chip 2000 May / Chip_2000-05_cd1.bin / zkuste / Perl / ActivePerl-5.6.0.613.msi / 䆊䌷䈹䈙䏵-䞅䞆䞀㡆䞃䄦䠥 / _91243be75c42fedadef2ca7541187083 < prev next >

Wrap

Text File | 2000-03-23 | 5.8 KB | 153 lines

<HTML> <HEAD> <TITLE>HTML::HeadParser - Parse <HEAD> section of a HTML document</TITLE> <LINK REL="stylesheet" HREF="../../../Active.css" TYPE="text/css"> <LINK REV="made" HREF="mailto:"> </HEAD> <BODY> <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%> <TR><TD CLASS=block VALIGN=MIDDLE WIDTH=100% BGCOLOR="#cccccc"> HTML::HeadParser - Parse <HEAD> section of a HTML document </TD></TR> </TABLE> <A NAME="__index__"></A>  <UL> <LI><A HREF="#name">NAME</A></LI><LI><A HREF="#supportedplatforms">SUPPORTED PLATFORMS</A></LI> <LI><A HREF="#synopsis">SYNOPSIS</A></LI> <LI><A HREF="#description">DESCRIPTION</A></LI> <LI><A HREF="#methods">METHODS</A></LI> <LI><A HREF="#example">EXAMPLE</A></LI> <LI><A HREF="#see also">SEE ALSO</A></LI> <LI><A HREF="#copyright">COPYRIGHT</A></LI> </UL>  <HR> <H1><A NAME="name">NAME</A></H1> HTML::HeadParser - Parse <HEAD> section of a HTML document <HR> <H1><A NAME="supportedplatforms">SUPPORTED PLATFORMS</A></H1> <UL> <LI>Linux</LI> <LI>Solaris</LI> <LI>Windows</LI> </UL> <HR> <H1><A NAME="synopsis">SYNOPSIS</A></H1> <PRE> require HTML::HeadParser; $p = HTML::HeadParser->new; $p->parse($text) and print "not finished";</PRE> <PRE> $p->header('Title') # to access <title>....</title> $p->header('Content-Base') # to access <base href="<A HREF="http://..."">http://..."</A>;> $p->header('Foo') # to access <meta http-equiv="Foo" content="..."></PRE> <HR> <H1><A NAME="description">DESCRIPTION</A></H1> The HTML::HeadParser is a specialized (and lightweight) HTML::Parser that will only parse the <HEAD>...</HEAD> section of an HTML document. The <A HREF="#item_parse"><CODE>parse()</CODE></A> method will return a FALSE value as soon as some <BODY> element or body text are found, and should not be called again after this. The HTML::HeadParser keeps a reference to a header object, and the parser will update this header object as the various elements of the <HEAD> section of the HTML document are recognized. The following header fields are affected: <DL> <DT><A NAME="item_Content%2DBase%3A">Content-Base:</A> <DD> The Content-Base header is initialized from the <base href=``...''> element. <DT><A NAME="item_Title%3A">Title:</A> <DD> The Title header is initialized from the <title>...</title> element. <DT><A NAME="item_Isindex%3A">Isindex:</A> <DD> The Isindex header will be added if there is a <isindex> element in the <head>. The header value is initialized from the prompt attribute if it is present. If not prompt attribute is given it will have '?' as the value. <DT><A NAME="item_X%2DMeta%2DFoo%3A">X-Meta-Foo:</A> <DD> All <meta> elements will initialize headers with the prefix ``<CODE>X-Meta-</CODE>'' on the name. If the <meta> element contains a <CODE>http-equiv</CODE> attribute, then it will be honored as the header name. </DL> <HR> <H1><A NAME="methods">METHODS</A></H1> The following methods (in addition to those provided by the superclass) are available: <DL> <DT><A NAME="item_new">$hp = HTML::HeadParser->new( [$header] )</A> <DD> The object constructor. The optional $header argument should be a reference to an object that implement the <A HREF="#item_header"><CODE>header()</CODE></A> and <CODE>push_header()</CODE> methods as defined by the HTTP::Headers class. Normally it will be of some class that isa or delegates to the HTTP::Headers class. If no $header is given HTML::HeadParser will create an HTTP::Header object by itself (initially empty). <DT><A NAME="item_parse">$hp->parse( $text )</A> <DD> Parses some HTML text (see HTML::Parser-><A HREF="#item_parse"><CODE>parse())</CODE></A> but will return FALSE as soon as parsing should end. <DT><A NAME="item_header">$hp->header;</A> <DD> Returns a reference to the header object. <DT>$hp->header( $key ) <DD> Returns a header value. It is just a shorter way to write <A HREF="#item_header"><CODE>$hp->header->header($key)</CODE></A>. </DL> <HR> <H1><A NAME="example">EXAMPLE</A></H1> <PRE> $h = HTTP::Headers->new; $p = HTML::HeadParser->new($h); $p->parse(<<EOT); <title>Stupid example</title> <base href="<A HREF="http://www.sn.no/libwww-perl/"">http://www.sn.no/libwww-perl/"</A>;> Normal text starts here. EOT undef $p; print $h->title; # should print "Stupid example"</PRE> <HR> <H1><A NAME="see also">SEE ALSO</A></H1> <A HREF="../../../site/lib/HTML/Parser.html">the HTML::Parser manpage</A>, <A HREF="../../../site/lib/HTTP/Headers.html">the HTTP::Headers manpage</A> The HTTP::Headers class is distributed as part of the libwww-perl package. <HR> <H1><A NAME="copyright">COPYRIGHT</A></H1> Copyright 1996-1998 Gisle Aas. All rights reserved. This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%> <TR><TD CLASS=block VALIGN=MIDDLE WIDTH=100% BGCOLOR="#cccccc"> HTML::HeadParser - Parse <HEAD> section of a HTML document </TD></TR> </TABLE> </BODY> </HTML>