#!/usr/bin/perl -w
use strict;

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

# prints:
# some,always,quoted stuff
# more,stuff,like that

__DATA__
"some","always","quoted stuff"
"more","stuff","like that"