my $monday_doc = << 'OUTPUT';
Today is Monday, my favorite day of the week.  It is my favorite day because Jerry said "Monday is the best day of the week".  Tuesday is my second-favorite day.  Why can't all days be as great as Monday?  Who knows.
OUTPUT

if($today eq 'Monday'){
    print $monday_doc;
}