Select Code to Download

$line =~ s/39,\\\\r\\n00,39,00,39,00,39/3$fields[0],\\\\r\\n00,3$field
+s[1],00,3$fields[2],00,3$fields[3]/g;