why the heredoc, is there an older version of perl that must be supported where simple strings could not be multiline?

this is 333, works on 5.32 atleast: