Since it is hopefully clear by now from the excellent answers which you have already received that going down this route would be A Bad Thing, I thought it might be worth writing a perlcritic policy to check for this. However, having done a little research today I am delighted to discover that such a policy already exists: Perl::Critic::Policy::Bangs::ProhibitNumberedNames.
This sounds like a really good addition in and of itself. The Perl::Critic::Bangs bundle also has some other tempting-looking policies as well. Just thought this was worth mentioning as it was new to me and I would have used it long ago if I had known about it.