$ perl -MTemplate -e'
    Template->new()->process(
        \$ARGV[0],
        { host => "localhost" },
        \my $cmd
    );
    system($cmd)
' 'echo [% host %]'
localhost