It would be cleaner to change you code to return values, but TT does provide a directive that automatically ties STDOUT for you. Try this:

{#PERL#}
$stash->get('show_elements');
{#END#}
[download]

Or just call &show_elements in some other way from within the PERL block.