Как мне обрабатывать встроенные символы новой строки в файлах CSV в Perl?

Question

Я читаю файл .csv, созданный в Excel, с первой строкой заголовков столбцов. Заголовок одного столбца содержит встроенную новую строку. Я хочу игнорировать эту новую строку, но читая ее построчно, например:

while ( <IN> ) { 
    ...
    }

будет воспринимать это как новую строку, которая нарушит мой код (который я еще не написал). Мой подход состоял в том, чтобы прочитать первую строку в массив заголовков столбцов и обработать остальные строки по-разному.

Возможно ли где-нибудь в while использовать регулярное выражение, которое игнорирует символ новой строки, если только это не последняя новая строка?

Или я должен подходить к этому по-другому?

Answer 1

Используйте один из модулей Perl, которые обрабатывают CSV, например Text :: CSV_XS . Его документация показывает вам, как работать со встроенными символами новой строки. В общем, вы не хотите тратить свое время на написание другого парсера CSV; получить более важные части вашей задачи!