Parent Directory
| 
Revision Log
r3129@llin (orig r253): dpavlin | 2008-11-04 20:00:13 +0100 added Frey::Dumper to dump data as html
| 1 | dpavlin | 287 | package Frey::Dumper; |
| 2 | use Moose; | ||
| 3 | |||
| 4 | =head1 NAME | ||
| 5 | |||
| 6 | Frey::Dumper - dump data using L<Data::Dumper::HTML> | ||
| 7 | |||
| 8 | =cut | ||
| 9 | |||
| 10 | use Data::Dumper::HTML qw(dumper_html); | ||
| 11 | |||
| 12 | has data => ( | ||
| 13 | is => 'rw', | ||
| 14 | required => 1, | ||
| 15 | ); | ||
| 16 | |||
| 17 | sub markup { | ||
| 18 | my ($self) = @_; | ||
| 19 | dumper_html( $self->data ); | ||
| 20 | } | ||
| 21 | |||
| 22 | 1; |
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |