Not really a perl question, more like an editor question. In vim, my editor of choice, type :se nu or put se nu in you ~/.vimrc file.

Depending on the editor, YMMV.

Or, more suavely but less practically, use Filter::NumberLines.