CSV 따옴표 붙은 문자열의 파싱 CSV 파일을 분할하여 사용 Perl에서

Question

다음과 같은 형식의 CSV 파일이 있으며, 쉼표로 구분 기호로 사용하여 표시된대로 Perl split 명령을 사용하고 있습니다. 문제는 내가 따옴표 붙은 문자열 "HTTP Large, GMS, ZMS: Large Files"에 쉼표가 포함되어있어 실패합니다. 배열 값은 요소 수가 적습니다. split 명령을 수정하려면 어떻게해야합니까? 같은 Text::CSV 같은 모듈이 만들어진 이유를 포함 쉼표 같은

my @values = split('\,', $line); 

CSV 파일

10852,800 Mob to Int'l,235341739,573047,84475.40,0.0003,Inbound,Ber unit 
10880,"HTTP Large, GMS, ZMS: Large Files",52852810,128,13712.68,0.0002,,Rer unit 
13506,Presence National,2716766818,2447643,309116.40,0.0001,Presence,per Cnit 

Answer 1

문제는 정확하게이다. 데이터에 쉼표가 포함되어 있지 않은 경우에만 정규 표현식을 사용할 수 있습니다. 데이터에 쉼표가 포함되어 있으면 이제는 쉼표가 포함 된 CSV를 처리하도록 설계된 도구로 이동해야하며 Perl (및 그 친척 Text::CSV_PP 및 Text::CSV_XS)에서 Text::CSV이됩니다.

Answer 2

나는 또한 당신과 같은 접근법을 사용하고 나와 잘 작동합니다. 이 코드를 사용해보십시오. 이유 (예를 들어)를 사용하지 않는 [`텍스트 :: CSV`] (http://search.cpan.org/~makamaka/Text- -

my @values = split(/(?<="),(?=")/, $line); 

는