As far as I'm concerned, anything other than for my $var (LIST) and for $_ (LIST) should be avoided. But it's probably best if enforced by perlcritic rather than warnings.

Honestly, it's rather obvious that $1 is special. If you start mucking with special vars, you get what you deserve.