while($_line1 =~ /"/) {
       ...
    $_extraLine1 =~ s/,//g;