Acho que seu problema é causado pelo uso indevido de ’ .
Você deve usar ' ('s / dst_ / dst_addr_ / g;') em seu comando.
perl -pi -e 's/dst_/dst_addr_/g' *.tcl
deve substituir toda a ocorrência de dst _ com dst_addr _ em todos os arquivos .tcl.
Espero que isso ajude