You could have $m there and 'escape' with one character if you were able to set some one-letter variable to 'm'; earlier.

Something like s/(\d+)/chr 110-($_>10)/e; could work but its a bit longer.

s/(\d+)/qw(n m)[$_>10]/e; is another path.

I'm no golfer, but maybe those might give you some ideas.