Hi Skeeve,
I've tried this:

    $ perl -MO=Deparse -wle 'print <DATA>; __DATA__ Text HERE'
    BEGIN { $^W = 1; }
    BEGIN { $/ = "\n"; $\ = "\n"; }
    print <DATA>;
    __DATA__
    -e syntax OK

And it seems perl tends to ignore the "Text HERE" part.
Hope this helps a bit. :)