programming-examples/perl/Report/Add _TOP to add the page header.pl

15 lines
341 B
Perl
Raw Normal View History

2019-11-15 12:59:38 +01:00
format STDOUT_TOP =
Employees
First Name Last Name ID Extension
--------------------------------------------
.
format STDOUT =
@<<<<<<<<<<<<@<<<<<<<<<<<<@<<<<<<<<@<<<<
$firstname $lastname $ID $extension
.
$firstname = "Cary"; $lastname = "Grant";
$ID = 1234; $extension = x456;
write;