http://www.perlmonks.org?node_id=527580


in reply to Prepend Evey Line in a File

one more way: 
perl -pi.bak -e 's/^/PREFIX/' filename.csv

[download]

In Section Seekers of Perl Wisdom