#! /usr/bin/perl use strict ; use warnings ; $|++ ; use Template ; my $tmpl = <<'END_OF_TEMPLATE' ; Content-type: text/html Title

Okay this prints out.

[% INSERT $myfile %] END_OF_TEMPLATE my $tt = new Template { 'ABSOLUTE' => 1 } ; my $filename = '/home/doug/.bashrc' ; $tt->process( \$tmpl, { 'myfile' => $filename } ) or die $tt->error() ; exit ;