You can't really use an eskimo kiss with -p. And it's equivalent to an END block so I'm not sure how that would help here.

But the open STDOUT, qq(>$ARGV.ext); version does work when slurping the files with -p00, for example in the case of a global substitution.