format STDOUT_TOP =
Project report for Mr. @* on (today)

---------------------------
$PROJECT_HEAD
.
format STDOUT =
@* @* @* @* @*
$DUE, $AT, $PRIORITY, $MSG, $CONTEXT
.

my $PROJECT_HEAD="NeilWatson";
write;