format PROJECT_TOP =
Project report for @* on (today)
$PROJECT                           
---------------------------
.

##</code><code>##

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

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

my $PROJECT_HEAD="NeilWatson";
write;

##</code><code>##

#OUTPUT
Project report for Mr.  on (today)
---------------------------
$PROJECT_HEAD

##</code><code>##

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

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

$PROJECT_HEAD="NeilWatson";
write;

##</code><code>##

#OUTPUT:
Project report for Mr.NeilWatson on (today)
---------------------------------