print ++$_." " foreach (@a);

個人的にはforとforeachは使い分けたい。（内部的には一緒とはいえ）