Add another two subroutine for test.
Simplify `template.perl