encode-name: fix 305 for threaded perl

with threads a svop const is really a padop