Report Perl

format STDOUT =
@<<<<<<<<<<<@<<<<<<<<<<<<<<<
$text1      $text2
@<<<<<<<<<<<@<<<<<<<<<<<<<<<
$text3      $text4
.
$text1 = "Hello";
$text2 = "there!";
$text3 = "How're";
$text4 = "things?";
write;