Perl: Stylistic refactoring of custom op code

Just making the style of the code more in line with the rest. It's no
better and no worse, just more similar to the rest.