214 |
my $pod = Frey::Pod->new( class => $class )->markup; |
my $pod = Frey::Pod->new( class => $class )->markup; |
215 |
|
|
216 |
use Frey::Run; |
use Frey::Run; |
217 |
my $execute = join("\n", map { qq|<a href="/$_/$class">$_</a>| } grep { $class->can($_) } Frey::Run->execute ); |
my $execute = join("\n", map { qq|<a href="/$class/$_">$_</a>| } grep { $class->can($_) } Frey::Run->execute ); |
218 |
$execute = " execute: $execute" if $execute; |
$execute = " execute: $execute" if $execute; |
219 |
|
|
220 |
my $html = $self->page( |
my $html = $self->page( |