I'm not familiar with 'format', but it looks like if you add an empty line after line 235, then it would work. Try to check perlform. Please see below.

#!/usr/bin/perl

use warnings;
use strict;

my ($DUE, $AT, $PRIORITY, $MSG, $CONTEXT);

format PROJECT_TOP =
Project report for @* on (Today)

---------------------------
$PROJECT
.

format PROJECT =
@* @* @* @* @*
$DUE, $AT, $PRIORITY, $MSG, $CONTEXT
.
[download]