在Perl中定义分页

如果您的报告占用一页以上,该怎么办?在Perl中,您有一个很好的解决方案来创建分页。我们只需使用$%或$FORMAT_PAGE_NUMBER变量以及标头,如下所示-

format EMPLOYEE_TOP =
===================================
Name                   Age Page @<
$%
===================================
.

现在您的输出将如下所示:

===================================
Name                  Age Page 1
===================================
===================================
Ali                   20
2000.00
===================================
===================================
Raza                  30
2500.00
===================================
===================================
Jaffer                40
4000.00
===================================