perl -ne 'print if /[^"]$/' test.csv