334 |
grep { $_ } ( |
grep { $_ } ( |
335 |
$runnable, |
$runnable, |
336 |
$has_tests, |
$has_tests, |
337 |
$pod ? qq|<a class="frey-skip" href="#___top" title="Skip to POD" >pod</a>| : '', |
( $pod ? qq|<a class="frey-skip" style="float: left;" href="#___top" title="Skip to POD" >pod</a>| : '' ) . ' ' . |
338 |
$source ? qq|<a class="frey-skip" href="#source" title="Skip to source" >source</a>| : '', |
( $source ? qq|<a class="frey-skip" style="float: right;" href="#source" title="Skip to source" >source</a>| : '' ) |
339 |
) |
) |
340 |
); |
); |
341 |
return join("\n", |
|
342 |
|
return |
343 |
qq| |
qq| |
344 |
<h1>$class</h1> |
<h1>$class</h1> |
345 |
<div class="frey-introspect"> |
<div class="frey-introspect"> |
355 |
|
|
356 |
<h1>Source</h1><a name="source"></a> |
<h1>Source</h1><a name="source"></a> |
357 |
<div class="frey-source">$source</div> |
<div class="frey-source">$source</div> |
358 |
|, |
| |
359 |
); |
; |
360 |
} |
} |
361 |
|
|
362 |
=head1 SEE ALSO |
=head1 SEE ALSO |