AFAIK, there is no way to pick the features enabled by -E automatically other than by using it.

But you can require just what you need inside the code chunk:

perl -wn -- - /etc/passwd <<'EOF'
use feature 'say';
next unless / ([^:]*) : [^:]* : ([0-9]+) /x;
my ($w, $n) = (uc $1, 5000 + $2);
say qq{log=$w id=$n}
EOF
[download]

That's the most future-proof solution.