open(DATA, "+<myfile.csv") || die "Error: $!";

while(<DATA>) {
    s/foo/bar/g;
    # print;
}

close(DATA);