##
$var1={
university=>{
'name'=>'svu',
'location'=>'ravru',
'branch'=>{
'electronics'=>{
'section'=>[
{
'name'=>'xxx',
'number'=>'12',
'sem'=>[
{
'semister'=>'1',
'subjects'=>'7',
'rank'=>'1'
},
{
'semister'=>'2',
'subjects'=>'4',
'rank'=>'1'
}
]
},
{
'name'=>'xxx',
'number'=>'15',
'sem'=>[
{
'semister'=>'1',
'subjects'=>'7',
'rank'=>'10'
},
{
'semister'=>'1',
'subjects'=>'7',
'rank'=>'1'
}
]
},
{
'name'=>'xxx',
'number'=>'16',
'sem'=>[
{
'semister'=>'1',
'subjects'=>'7',
'rank'=>'2'
},
{
'semister'=>'2',
'subjects'=>'4',
'rank'=>'2'
}
]
}
}
]
}
};
####
my $template = Template->new();
my $filename = 'output.tex';
$template->process(\*DATA, $data, $filename)
|| die "Template process failed: ", $template->error(), "\n";
system( "pdflatex $filename" );
__DATA__
\documentclass[a4paper,leqno,twoside]{article}
\begin{document}
[% FOREACH st IN university %]
[% st.name %]
[% st.location %]
branch student:[% st.branch.electronics.section.0.name %]
[%st.branch.electronics.section.0.number %]
[% st.branch.electronics.section.0.sem.semister %]
[% st.branch.electronics.section.0.sem.subjects %]
[% st.branch.electronics.section.0.sem.rank %]
branch student:[% st.branch.electronics.section.1.name %]
[%st.branch.electronics.section.1.number %]
[% st.branch.electronics.section.1.sem.semister %]
[% st.branch.electronics.section.1.sem.subjects %]
[% st.branch.electronics.section.1.sem.rank %]
[%END%]
/end{document}