...
   228      write $out;
   229  }
   230  close $out;
   231  
   232  ##########################
   233  # Formats
   234  format PROJECT_TOP =
   235  Project report for @* on (today)
   236  ---------------------------
   237  $PROJECT
   238  .
   239  
   240  format PROJECT =
   241  @* @* @* @* @*
   242  $DUE, $AT, $PRIORITY, $MSG, $CONTEXT
   243  .
   244  
...