#!/usr/bin/perl use Template; my $tt = Template->new; my $template = <<"HERE"; HERE $tt->process( \$template, { url => 'http://www.example.com', active => 1 } ); $tt->process( \$template, { url => 'http://www.example.com', active => 0 } );