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}