use Modern::Perl;

while (<DATA>) {
    tr/"/'/;
    print;
}


__DATA__
Dit, is, een, "CSV record"
En, dit, "ook", !
En, hij , zei, "'Hallo, hoe gaat het?'"