Select Code to Download

sub examplRM{
my $self = shift;
...
my $output = 'example'
$template->param( outputVar => $output);
return $template->output;

sub exampleNav{
my $self = shift;
my @nav = qw(Nav1, Nav2, Nav3);
return \@nav;
}