118 |
$body .= '<tr><th>' . join('</th><th>', @{$data->{NAME}} ) . '</th></tr>'; |
$body .= '<tr><th>' . join('</th><th>', @{$data->{NAME}} ) . '</th></tr>'; |
119 |
$body .= '<tr><td>' . join('</td><td>', @$_ ) . '</td></tr>' foreach @{ $data->{rows} }; |
$body .= '<tr><td>' . join('</td><td>', @$_ ) . '</td></tr>' foreach @{ $data->{rows} }; |
120 |
$body .= '</table>'; |
$body .= '</table>'; |
121 |
|
|
122 |
|
delete( $data->{rows} ); # too much dumplication |
123 |
|
$body .= Frey::View::Dumper->new( data => $data )->as_markup if $data; |
124 |
} |
} |
125 |
} elsif ( $self->run =~ m{(as_data|sql)} ) { |
} elsif ( $self->run =~ m{(as_data|sql)} ) { |
126 |
my $run = $self->run; |
my $run = $self->run; |