--- lib/PXElator/html.pm 2009/08/09 21:59:17 187 +++ lib/PXElator/html.pm 2009/08/09 22:05:09 188 @@ -34,7 +34,7 @@ sub tt { - qq|| . join(' ', @_) . qq||; + qq|| . join(' ', @_) . qq|| if @_; } sub select { @@ -48,6 +48,10 @@ ); } +sub pre { + qq|
| . join(' ', @_) . qq|
| if @_; +} + sub pre_dump { my $data = shift; my $dump = dump( $data );