Lab-Measurement-DocWriter
1 match

 view release on metacpan or  search on metacpan

lib/Lab/Measurement/DocWriter/HTML.pm  view on Meta::CPAN 

        $self->{list_open} = 0;
    }
    print {$self->{index_fh}} $self->_get_footer();
    close $self->{index_fh};
}

sub _get_header {
    my ($self, $title) = @_;
    return <<HEADER;
<?xml version="1.0" encoding="utf8" ?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en">
    <head>
        <meta http-equiv="Content-Type" content="text/html; charset=utf8">
        <link rel="stylesheet" type="text/css" href="../doku.css"/>
        <title>$title</title>
    </head>
    <body>
    <!--#include virtual="/defhead.html" -->
    <!--#include virtual="/docstoc.html" -->
HEADER



( run in 0.926 second using v1.01-cache-2.11-cpan-49f99fa48dc )