Select Code to Download

#! /usr/bin/perl
use strict ;
...
$tt->process( \$tmpl, { 'myfile' => $filename } ) or die $tt->error() 
+;

exit ;