The "code" (rather than "one liner") equivelent of tirwhan's example:

use strict;
use warnings;

local @ARGV = ('file.csv');
local $^I = '.bak';

while (<>)
  {
  print "prepended stuff - $_";
  }
[download]