Defining the Output Format
format STDOUT_TOP =
Code   Price    Notes
----   -------  --------
.
format STDOUT =
@>>>   ^###.##  ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
$prod, $cost,   $note
~~              ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                $note
.
8