Help for this page
my $file_name = ${shift()}; my $lines_in = ${shift()};
sub read_template { ... } return($line_cnt); }