#!/usr/bin/perl -w

use HTML::Template;
use Data::Dumper;

my $template = HTML::Template->new(filename => $f_name,debug=>1);
print Dumper($template);