Select Code to Download

$i=0;
$line2 = join '', grep { $i++ % 2 ? s/,/ /g : 1 } split /"/,$line;

1925,47365,2,650187016,1,1,
MADE FOR DRAWDOWNS, NEVER P/U
,16,IFC 8112NP,Standalone-6,,,44,10/22/2015,91607,,B24W02651,,
PA-3, PURE
,4/28/2015,1,0,,1,MAN,,CUST,,CUSTOM MATCH,0,TRUE,TRUE,O,C48A0D001EF449
+E3AB97F0B98C811B1B,POS.MISTINT.V0000.UP.Q,PROD_SMISA_BK,414D512050524
+F445F504F5331393235906F28561D2F0020,10/22/2015 9:29,10/22/2015 9:30

$i=0;
$line2 = join '', map{ $i++ % 2 &&  s/,/ /g; $_ } split /"/,$line;