[perl #3330] warn on increment of an non number/non-magically incable value