#!/usr/bin/env perl

my $string = <<~THEEND;
    EOF
        THEEND


print $string; # FAIL

##</code><code>##

       THEEND