Did you try this out? The << operator does not need to be disambiguated with whitespace, as the following code fragment shows:

#! /usr/bin/perl -w

use strict;

print STDOUT<<text;
foo
bar
text
[download]

produces:

foo
bar
[download]

---

Oops, uploaded the wrong fragment. I tested with an explicit file handle and without. Although for the sake of completeness I guess I should leave both up

#! /usr/bin/perl -w

use strict;

print<<text;
foo
bar
text
[download]

--

g r i n d e r
just another bofh

print@_{sort keys %_},$/if%_=split//,'= & *a?b:e\f/h^h!j+n,o@o;r$s-t%t#u';