Manipulação de strings perl?

Então, vamos supor que tenho um arquivo de texto com várias linhas mais ou menos assim:

a=
b=
c=
d=
e=
...

Gostaria de abrir esse txt pelo perl e acrescentar 1 letra (ou mais) DEPOIS do = .
Assim ficando:

a=*
b=*
c=*
d=*
e=*
...

Como fazer :S

calmai galera, é muita gente querendo ajudar, não to conseguindo acompanhar

Amigo,


Voce pode dar um cat no arquivo para isso assim:

cat ARQUIVO | perl -ne 'chomp; print $_,"*\n";'


Ou mesmo fazer um script abrindo com open(), etc.