Help for this page
select TOP_STDOUT; print;
my $format = "format TOP_STDOUT= NAME ID SALARY ... . write;" print TOP_STDOUT $format;