Kjetil Kjernsmo > Formatter-HTML-Preformatted-0.95 > Formatter::HTML::Preformatted

Download:
Formatter-HTML-Preformatted-0.95.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.95   Source  

NAME ^

Formatter::HTML::Preformatted - Absolute minimal HTML formatting of pure text

SYNOPSIS ^

  use Formatter::HTML::Preformatted;
  my $formatter = Formatter::HTML::Preformatted->format($data);
  print $formatter->fragment;
  my @links = $text->links;
  print ${$links}[0]->{url};

DESCRIPTION ^

This module will simply take any text-string and put it in a HTML pre element. It will escape tags and entities. It will also look through it to see if there are any URIs, and they will be turned into hyperlinks.

METHODS ^

This module conforms with the Formatter API specification, version 0.95:

format($string)

The format function that you call to initialise the formatter. It takes the plain text as a string argument and returns an object of this class.

fragment

To get only the text enclosed in the minimal pre element, you will call this method. It returns a string with the HTML fragment.

document([$charset])

Will add a document type declaration and some minimal markup, to return a full, valid, HTML document. You may specify an optional $charset parameter. This will include a HTML meta element with the chosen character set. It will still be your responsibility to ensure that the document served is encoded with this character set.

links

Will return all links found the input plain text string. They will be found in an arrayref where each element has a key url.

title

Since this formatter has no way of finding the title of the document this method will always return undef.

SEE ALSO ^

Formatter, Formatter::HTML::Textile, URI::Find::Simple

AUTHOR ^

Kjetil Kjernsmo, <kjetilk@cpan.org>

COPYRIGHT AND LICENSE ^

Copyright (C) 2004-2005 by Kjetil Kjernsmo

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.4 or, at your option, any later version of Perl 5 you may have available.

syntax highlighting: