perl -i -l -p -e ' s /(.*)/Number => ${1}/s; '  test.txt