package HTML::Display::Dump; use strict; use parent 'HTML::Display::Common'; use vars qw($VERSION); $VERSION='0.39'; =head1 NAME HTML::Display::Dump - dump raw HTML to the console =head1 SYNOPSIS =for example use HTML::Display; =for example begin my $browser = HTML::Display->new( class => 'HTML::Display::Dump', ); $browser->display("

Hello world!

"); =for example end =for example_testing isa_ok($browser,"HTML::Display::Common"); is($_STDOUT_,"

Hello world!

","Dumped output"); is($_STDERR_,undef,"No warnings"); =cut sub display_html { print $_[1]; }; =head1 AUTHOR Copyright (c) 2004-2007 Max Maischein C<< >> =head1 LICENSE This module is released under the same terms as Perl itself. =cut 1;