programming-examples/perl/Report/Define format and variables for the format.pl

7 lines
166 B
Perl
Raw Normal View History

2019-11-15 12:59:38 +01:00
format STDOUT =
@<<<<<<<<<<<@>>>>>>>>>>>>>>>
$text1 $text2
.
$text1 = "Hello";
$text2 = "there!";
write; #Uses STDOUT by default.