Mediawiki-Blame
view release on metacpan or search on metacpan
examples/mb.pl view on Meta::CPAN
use warnings;
package Mediawiki::Blame::Server;
use lib qw(lib);
use Mediawiki::Blame qw();
use HTML::Entities qw(encode_entities);
use Encode;
use base qw(HTTP::Server::Simple::CGI);
our $HEAD = <<"";
<!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="application/xhtml+xml;charset=UTF-8" />
<title>Mediawiki::Blame/$Mediawiki::Blame::VERSION</title>
<style type="text/css">
fieldset ul {clear: both;}
fieldset div label {float: left; text-align: right; width: 3em;}
fieldset div input {float: right; text-align: left; width: 90%;}
fieldset ul li {font-family: monospace;}
table:nth-child(even) {background-color: #eee;}
( run in 1.673 second using v1.01-cache-2.11-cpan-49f99fa48dc )