用 Perl 定義報告頁尾

在 Perl 中，雖然 $^ 或 $FORMAT_TOP_NAME 包含當前標頭格式的名稱，但沒有相應的機制自動對頁尾執行相同操作。如果您有一個固定大小的頁尾，可以透過在每次 write() 之前檢查變數 $- 或 $FORMAT_LINES_LEFT 來獲取頁尾，並在必要時使用如下定義的另一種格式自己列印頁尾 -

format EMPLOYEE_BOTTOM =
End of Page @<
          $%
.

有關與格式相關的變數的完整集，請參閱 Perl 特殊變數 部分。

Mohd Mohtashim

更新時間：2019-11-29

140 次檢視

開始 職業生涯

完成課程獲得認證

開始