r22365 - in /branches/upstream/libhtml-wikiconverter-snipsnap-perl: ./ current/ current/lib/ current/lib/HTML/ current/lib/HTML/WikiConverter/ current/t/

js at users.alioth.debian.org js at users.alioth.debian.org
Sun Jun 29 00:43:55 UTC 2008


Author: js
Date: Sun Jun 29 00:43:55 2008
New Revision: 22365

URL: http://svn.debian.org/wsvn/?sc=1&rev=22365
Log:
[svn-inject] Installing original source of libhtml-wikiconverter-snipsnap-perl

Added:
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/Changes
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/MANIFEST
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/META.yml
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/Makefile.PL
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/README
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/lib/
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/lib/HTML/
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/lib/HTML/WikiConverter/
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/lib/HTML/WikiConverter/SnipSnap.pm
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/00-load.t
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/boilerplate.t
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/pod-coverage.t
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/pod.t
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/runtests.pl
    branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/snipsnap.t

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/Changes
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/Changes?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/Changes (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/Changes Sun Jun 29 00:43:55 2008
@@ -1,0 +1,6 @@
+# Change log for HTML::WikiConverter::SnipSnap
+
+version: 0.50
+date:    Tue Jan 10 2006
+changes:
+  - Branched from main HTML::WikiConverter codebase.

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/MANIFEST?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/MANIFEST (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/MANIFEST Sun Jun 29 00:43:55 2008
@@ -1,0 +1,12 @@
+Changes
+MANIFEST
+META.yml # Will be created by "make dist"
+Makefile.PL
+README
+lib/HTML/WikiConverter/SnipSnap.pm
+t/00-load.t
+t/boilerplate.t
+t/pod-coverage.t
+t/pod.t
+t/snipsnap.t
+t/runtests.pl

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/META.yml
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/META.yml?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/META.yml (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/META.yml Sun Jun 29 00:43:55 2008
@@ -1,0 +1,12 @@
+# http://module-build.sourceforge.net/META-spec.html
+#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
+name:         HTML-WikiConverter-SnipSnap
+version:      0.50
+version_from: lib/HTML/WikiConverter/SnipSnap.pm
+installdirs:  site
+requires:
+    HTML::WikiConverter:           0.5
+    Test::More:                    0
+
+distribution_type: module
+generated_by: ExtUtils::MakeMaker version 6.17

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/Makefile.PL?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/Makefile.PL (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/Makefile.PL Sun Jun 29 00:43:55 2008
@@ -1,0 +1,17 @@
+use strict;
+use warnings;
+use ExtUtils::MakeMaker;
+
+WriteMakefile(
+    NAME                => 'HTML::WikiConverter::SnipSnap',
+    AUTHOR              => 'David J. Iberri <diberri at cpan.org>',
+    VERSION_FROM        => 'lib/HTML/WikiConverter/SnipSnap.pm',
+    ABSTRACT_FROM       => 'lib/HTML/WikiConverter/SnipSnap.pm',
+    PL_FILES            => {},
+    PREREQ_PM => {
+        'Test::More' => 0,
+        'HTML::WikiConverter' => 0.50,
+    },
+    dist                => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
+    clean               => { FILES => 'HTML-WikiConverter-SnipSnap-*' },
+);

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/README
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/README?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/README (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/README Sun Jun 29 00:43:55 2008
@@ -1,0 +1,75 @@
+HTML::WikiConverter::SnipSnap version 0.50
+==========================================
+
+HTML::WikiConverter::SnipSnap adds the SnipSnap dialect to
+HTML::WikiConverter allowing the conversion of HTML to SnipSnap
+markup.
+
+SYNOPSIS
+
+Converting HTML to wiki markup is easy:
+
+  use HTML::WikiConverter;
+  my $wc = new HTML::WikiConverter( dialect => 'SnipSnap' );
+  print $wc->html2wiki( $html );
+
+Or from the command line:
+
+  % html2wiki --dialect SnipSnap input.html > output.wiki
+
+There's also a web interface if you're so inclined:
+
+  http://diberri.dyndns.org/html2wiki.html
+
+VERSION
+
+This is HTML::WikiConverter::SnipSnap 0.50.
+
+Prior versions of HTML::WikiConverter supported the SnipSnap dialect
+out of the box. As of 0.50, each dialect was branched off into a
+separate CPAN package.
+
+CHANGES IN 0.50
+
+  * SnipSnap dialect now has its own CPAN package
+
+DEPENDENCIES
+
+  * HTML::WikiConverter version 0.50
+
+INSTALLATION
+
+To install this module, run the following commands:
+
+    perl Makefile.PL
+    make
+    make test
+    make install
+
+SUPPORT AND DOCUMENTATION
+
+After installing, you can find documentation for this module with the
+perldoc command.
+
+    perldoc HTML::WikiConverter::SnipSnap
+
+You can also look for information at:
+
+    Search CPAN
+        http://search.cpan.org/dist/HTML-WikiConverter-SnipSnap
+
+    CPAN Request Tracker:
+        http://rt.cpan.org/NoAuth/Bugs.html?Dist=HTML-WikiConverter-SnipSnap
+
+    AnnoCPAN, annotated CPAN documentation:
+        http://annocpan.org/dist/HTML-WikiConverter-SnipSnap
+
+    CPAN Ratings:
+        http://cpanratings.perl.org/d/HTML-WikiConverter-SnipSnap
+
+COPYRIGHT AND LICENCE
+
+Copyright (C) 2006 David J. Iberri
+
+This program is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself.

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/lib/HTML/WikiConverter/SnipSnap.pm
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/lib/HTML/WikiConverter/SnipSnap.pm?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/lib/HTML/WikiConverter/SnipSnap.pm (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/lib/HTML/WikiConverter/SnipSnap.pm Sun Jun 29 00:43:55 2008
@@ -1,0 +1,144 @@
+package HTML::WikiConverter::SnipSnap;
+
+use warnings;
+use strict;
+
+use base 'HTML::WikiConverter';
+
+our $VERSION = '0.50';
+
+=head1 NAME
+
+HTML::WikiConverter::SnipSnap - Convert HTML to SnipSnap markup
+
+=head1 SYNOPSIS
+
+  use HTML::WikiConverter;
+  my $wc = new HTML::WikiConverter( dialect => 'SnipSnap' );
+  print $wc->html2wiki( $html );
+
+=head1 DESCRIPTION
+
+This module contains rules for converting HTML into SnipSnap
+markup. See L<HTML::WikiConverter> for additional usage details.
+
+=cut
+
+sub rules {
+  my %rules = (
+    b => { start => '__', end => '__' },
+    strong => { alias => 'b' },
+    i => { start => '~~', end => '~~' },
+    em => { alias => 'i' },
+    strike => { start => '--', end => '--' },
+
+    p => { block => 1, trim => 'both', line_format => 'multi' },
+    hr => { replace => "\n\n----\n\n" },
+    br => { replace => "\\\\" },
+
+    a => { replace => \&_link },
+    blockquote => { start => '{quote}', end => '{quote}' },
+
+    ul => { line_format => 'multi', block => 1 },
+    ol => { alias => 'ul' },
+    li => { start => \&_li_start, trim => 'leading' },
+
+    table => { start => "{table}\n", end => '{table}', block => 1, line_format => 'multi' },
+    tr => { line_format => 'single', end => "\n" },
+    td => { end => \&_td_end },
+    th => { alias => 'td' },
+
+    h1 => { start => '1 ', block => 1 },
+  );
+
+  for( 2..6 ) {
+    $rules{"h$_"} = { start => '1.1 ', block => 1 };
+  }
+
+  return \%rules;
+}
+
+sub _td_end {
+  my( $self, $node, $rules ) = @_;
+  my @right_cells = grep { $_->tag && $_->tag =~ /th|td/ } $node->right;
+  return ' | ' if @right_cells;
+  return '';
+}
+
+sub _link {
+  my( $self, $node, $rules ) = @_;
+  my $url = $node->attr('href') || '';
+  my $text = $self->get_elem_contents($node) || '';
+
+  if( my $title = $self->get_wiki_page($url) ) {
+    $text =~ s~\+~ ~g;
+    return "[$text]" if lc $text eq lc $title;
+    return "[$text|$title]";
+  } else {
+    return $url if $url eq $text;
+    return "{link:$text|$url}";
+  }
+}
+
+sub _li_start {
+  my( $self, $node, $rules ) = @_;
+
+  my $bullet = $node->parent->tag eq 'ol' ? '1' : '*';
+  my @parents = $node->look_up( _tag => qr/ul|ol/ );
+  my $prefix = ( $bullet ) x @parents;
+  $prefix .= '.' if $node->parent->tag eq 'ol';
+
+  return "\n$prefix ";
+}
+
+=head1 AUTHOR
+
+David J. Iberri, C<< <diberri at cpan.org> >>
+
+=head1 BUGS
+
+Please report any bugs or feature requests to
+C<bug-html-wikiconverter-snipsnap at rt.cpan.org>, or through the web
+interface at
+L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=HTML-WikiConverter-SnipSnap>.
+I will be notified, and then you'll automatically be notified of
+progress on your bug as I make changes.
+
+=head1 SUPPORT
+
+You can find documentation for this module with the perldoc command.
+
+    perldoc HTML::WikiConverter::SnipSnap
+
+You can also look for information at:
+
+=over 4
+
+=item * AnnoCPAN: Annotated CPAN documentation
+
+L<http://annocpan.org/dist/HTML-WikiConverter-SnipSnap>
+
+=item * CPAN Ratings
+
+L<http://cpanratings.perl.org/d/HTML-WikiConverter-SnipSnap>
+
+=item * RT: CPAN's request tracker
+
+L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=HTML-WikiConverter-SnipSnap>
+
+=item * Search CPAN
+
+L<http://search.cpan.org/dist/HTML-WikiConverter-SnipSnap>
+
+=back
+
+=head1 COPYRIGHT & LICENSE
+
+Copyright 2006 David J. Iberri, all rights reserved.
+
+This program is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself.
+
+=cut
+
+1;

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/00-load.t
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/00-load.t?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/00-load.t (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/00-load.t Sun Jun 29 00:43:55 2008
@@ -1,0 +1,9 @@
+#!perl -T
+
+use Test::More tests => 1;
+
+BEGIN {
+	use_ok( 'HTML::WikiConverter::SnipSnap' );
+}
+
+diag( "Testing HTML::WikiConverter::SnipSnap $HTML::WikiConverter::SnipSnap::VERSION, Perl $], $^X" );

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/boilerplate.t
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/boilerplate.t?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/boilerplate.t (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/boilerplate.t Sun Jun 29 00:43:55 2008
@@ -1,0 +1,48 @@
+#!perl -T
+
+use strict;
+use warnings;
+use Test::More tests => 3;
+
+sub not_in_file_ok {
+    my ($filename, %regex) = @_;
+    open my $fh, "<", $filename
+        or die "couldn't open $filename for reading: $!";
+
+    my %violated;
+
+    while (my $line = <$fh>) {
+        while (my ($desc, $regex) = each %regex) {
+            if ($line =~ $regex) {
+                push @{$violated{$desc}||=[]}, $.;
+            }
+        }
+    }
+
+    if (%violated) {
+        fail("$filename contains boilerplate text");
+        diag "$_ appears on lines @{$violated{$_}}" for keys %violated;
+    } else {
+        pass("$filename contains no boilerplate text");
+    }
+}
+
+not_in_file_ok(README =>
+    "The README is used..."       => qr/The README is used/,
+    "'version information here'"  => qr/to provide version information/,
+);
+
+not_in_file_ok(Changes =>
+    "placeholder date/time"       => qr(Date/time)
+);
+
+sub module_boilerplate_ok {
+    my ($module) = @_;
+    not_in_file_ok($module =>
+        'the great new $MODULENAME'   => qr/ - The great new /,
+        'boilerplate description'     => qr/Quick summary of what the module/,
+        'stub function definition'    => qr/function[12]/,
+    );
+}
+
+module_boilerplate_ok('lib/HTML/WikiConverter/SnipSnap.pm');

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/pod-coverage.t
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/pod-coverage.t?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/pod-coverage.t (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/pod-coverage.t Sun Jun 29 00:43:55 2008
@@ -1,0 +1,20 @@
+#!perl -T
+
+use Test::More;
+eval "use Test::Pod::Coverage 1.04";
+plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" if $@;
+all_pod_coverage_ok( { also_private => [
+  # These methods are documented in HTML::WikiConverter::Dialects
+  qr/
+     get_elem_contents
+    |get_wiki_page
+    |get_attr_str
+    |is_camel_case
+    |attributes
+    |preprocess_node
+    |postprocess_output
+    |caption2para
+    |strip_aname
+    |rules
+  /x
+] } );

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/pod.t
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/pod.t?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/pod.t (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/pod.t Sun Jun 29 00:43:55 2008
@@ -1,0 +1,6 @@
+#!perl -T
+
+use Test::More;
+eval "use Test::Pod 1.14";
+plan skip_all => "Test::Pod 1.14 required for testing POD" if $@;
+all_pod_files_ok();

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/runtests.pl
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/runtests.pl?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/runtests.pl (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/runtests.pl Sun Jun 29 00:43:55 2008
@@ -1,0 +1,126 @@
+#!/usr/bin/perl
+use warnings;
+use strict;
+
+use Test::More;
+use File::Spec;
+use HTML::Entities;
+use HTML::WikiConverter;
+*e = \&encode_entities;
+
+my $more_tests = <<END_TESTS;
+__NEXT__
+entities (1)
+__H__
+To enter a '&lt;' in your input, use "&amp;lt;"
+__W__
+To enter a '&lt;' in your input, use "&amp;lt;"
+__NEXT__
+entities (2)
+__H__
+To enter a '<' in your input, use "&amp;lt;"
+__W__
+To enter a '&lt;' in your input, use "&amp;lt;"
+__NEXT__
+strip comments
+__H__
+A <!-- stripped --> comment
+__W__
+A  comment
+__NEXT__
+strip head
+__H__
+<html>
+<head><title>fun stuff</title></head>
+<body>
+<p>Crazy stuff here</p>
+</body>
+</html>
+__W__
+Crazy stuff here
+__NEXT__
+strip scripts
+__H__
+<html>
+<head><script>bogus stuff</script></head>
+<body>
+<script>maliciousCode()</script>
+<p>benevolent text</p>
+</body>
+</html>
+__W__
+benevolent text
+END_TESTS
+
+sub runtests {
+  my %arg = @_;
+
+  $arg{strip_comments} = 1;
+  $arg{wrap_in_html} = 1;
+  $arg{base_uri} ||= 'http://www.test.com';
+  my $minimal = $arg{minimal} || 0;
+
+  my $data = $arg{data} || '';
+  $data .= entity_tests() . $more_tests unless $minimal;
+
+  my @tests = split /__NEXT__\n/, $data;
+  my $numtests = @tests;
+  #$numtests += 1 unless $minimal; # file test
+  plan tests => $numtests;
+
+  # Delete unrecognized HTML::WikiConverter options
+  delete $arg{$_} for qw/ data minimal /;
+
+  my $wc = new HTML::WikiConverter(%arg);
+  foreach my $test ( @tests ) {
+    $test =~ s/^(.*?)\n//; my $name = $1;
+    my( $html, $wiki ) = split /__W__\n/, $test;
+    $html =~ s/__H__\n//;
+
+    for( $html, $wiki ) { s/^\n+//; s/\n+$// }
+    is( $wc->html2wiki($html), $wiki, $name );
+  }
+
+  #file_test($wc) unless $minimal;
+}
+
+sub entity_tests {
+  my $tmpl = "__NEXT__\n%s\n__H__\n%s\n__W__\n%s\n"; # test-name, html-input, expected-wiki-output
+
+  my $data = '';
+  my @chars = ( '<', '>', '&' );
+  foreach my $char ( @chars ) {
+    ( my $charname = e($char) ) =~ s/[&;]//g;
+    $data .= sprintf $tmpl, "literal ($charname)", $char, e($char)
+          .  sprintf $tmpl, "encode ($charname)", e($char), e($char)
+          .  sprintf $tmpl, "meta ($charname)", e(e($char)), e(e($char));
+  }
+
+  return $data;
+}
+
+sub _slurp {
+  my $path = shift;
+  open H, $path or die "couldn't open $path: $!";
+  local $/;
+  my $c = <H>;
+  close H;
+  return $c;
+}
+
+sub file_test {
+  my $wc = shift;
+  my $lc_dialect = lc $wc->dialect;
+  my $infile = File::Spec->catfile( 't', 'complete.html' );
+  my $outfile = File::Spec->catfile( 't', "complete.$lc_dialect" );
+
+  SKIP: {
+    skip "Couldn't find $infile (ignore this)", 1 unless -e $infile;
+    skip "Couldn't find $outfile (ignore this)", 1 unless -e $outfile;
+    my( $got, $expect ) = ( $wc->html2wiki( file => $infile, slurp => 1 ), _slurp($outfile) );
+    for( $got, $expect ) { s/^\n+//; s/\n+$// }
+    is( $got, $expect, 'read from file' );
+  };
+}
+
+1;

Added: branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/snipsnap.t
URL: http://svn.debian.org/wsvn/branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/snipsnap.t?rev=22365&op=file
==============================================================================
--- branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/snipsnap.t (added)
+++ branches/upstream/libhtml-wikiconverter-snipsnap-perl/current/t/snipsnap.t Sun Jun 29 00:43:55 2008
@@ -1,0 +1,210 @@
+local $/;
+require 't/runtests.pl';
+runtests( data => <DATA>, dialect => 'SnipSnap', wiki_uri => 'http://www.test.com/space/' );
+close DATA;
+
+__DATA__
+bold
+__H__
+<b>bold</b>
+__W__
+__bold__
+__NEXT__
+strong
+__H__
+<strong>strong</strong>
+__W__
+__strong__
+__NEXT__
+italic
+__H__
+<i>italic</i>
+__W__
+~~italic~~
+__NEXT__
+emphasized
+__H__
+<em>em</em>
+__W__
+~~em~~
+__NEXT__
+strike
+__H__
+<strike>strike</strike>
+__W__
+--strike--
+__NEXT__
+internal link
+__H__
+<a href="http://www.test.com/space/SnipSnap">SnipSnap</a>
+__W__
+[SnipSnap]
+__NEXT__
+internal link (alt text)
+__H__
+<a href="http://www.test.com/space/SnipSnap">link text</a>
+__W__
+[link text|SnipSnap]
+__NEXT__
+external link (plain)
+__H__
+<a href="http://www.google.com">http://www.google.com</a>
+__W__
+http://www.google.com
+__NEXT__
+external link (alt text)
+__H__
+<a href="http://www.google.com">Google</a>
+__W__
+{link:Google|http://www.google.com}
+__NEXT__
+citation
+__H__
+<blockquote>citation</blockquote>
+__W__
+{quote}citation{quote}
+__NEXT__
+h1
+__H__
+<h1>h1</h1>
+__W__
+1 h1
+__NEXT__
+h2
+__H__
+<h2>h2</h2>
+__W__
+1.1 h2
+__NEXT__
+h3
+__H__
+<h3>h3</h3>
+__W__
+1.1 h3
+__NEXT__
+h4
+__H__
+<h4>h4</h4>
+__W__
+1.1 h4
+__NEXT__
+h5
+__H__
+<h5>h5</h5>
+__W__
+1.1 h5
+__NEXT__
+h6
+__H__
+<h6>h6</h6>
+__W__
+1.1 h6
+__NEXT__
+linebreak
+__H__
+line<br />break
+__W__
+line\\break
+__NEXT__
+hr
+__H__
+<hr />
+__W__
+----
+__NEXT__
+tables
+__H__
+<table>
+<tr><th>name</th><th>age</th><th>city</th></tr>
+<tr><td>foo</td><td>57</td><td>hollywood</td></tr>
+<tr><td>bar</td><td>45</td><td>rubble</td></tr>
+<tr><td>baz</td><td>39</td><td>hammock</td></tr>
+</table>
+__W__
+{table}
+name | age | city
+foo | 57 | hollywood
+bar | 45 | rubble
+baz | 39 | hammock
+{table}
+__NEXT__
+ordered list
+__H__
+<ol>
+  <li>one
+  <li>two
+  <li>three
+</ol>
+__W__
+1. one
+1. two
+1. three
+__NEXT__
+<ul>
+__H__
+  <li>one
+  <li>two
+  <li>three
+</ul>
+__W__
+* one
+* two
+* three
+__NEXT__
+nested list (ol/ul)
+__H__
+<ol>
+  <li>1
+    <ul>
+      <li>1.a
+      <li>1.b
+      <li>1.c
+    </ul>
+  </li>
+  <li>2
+  <li>3
+    <ul>
+      <li>3.a
+      <li>3.b
+    </ul>
+  </li>
+</ol>
+__W__
+1. 1
+** 1.a
+** 1.b
+** 1.c
+1. 2
+1. 3
+** 3.a
+** 3.b
+__NEXT__
+nested list (ul/ol)
+__H__
+<ul>
+  <li>1
+    <ol>
+      <li>1.a
+      <li>1.b
+        <ol>
+          <li>1.c
+        </ol>
+    </ol>
+  </li>
+  <li>2
+  <li>3
+    <ol>
+      <li>3.a
+      <li>3.b
+    </ol>
+  </li>
+</ul>
+__W__
+* 1
+11. 1.a
+11. 1.b
+111. 1.c
+* 2
+* 3
+11. 3.a
+11. 3.b




More information about the Pkg-perl-cvs-commits mailing list