If you are going to use the here doc way, I suggest putting single quotes around the delimiter; otherwise, Perl will interpolate anything starting with a $ or a @, which might cause warnings, or even compile errors if you use strict.

Abigail