PerlによるCSVの読み込みとCSVをTSVに変換するワンライナー 2012-03-09-1 [Programming] PerlによるCSVの読み込み方法。 既存のモジュール(Text::CSV等)を使わない場合について。 今回の方法で想定するCSVフォーマット区切り文字はカンマ。各カラムはダブルクォートで囲み、内部のダブルクォートは二重にする。カラム内にカンマ、ダブルクォート、改行コードがない場合はダブルクォートで囲まなくてもよい。注意警告なしに非対応フォーマットでも読み込んでしまう。「ダブルクォートの閉じ忘れ」など。「...,"",...」のように空要素をダブルクォートで囲んだ場合は「""」が出てきてしまう。 ■コード(cvs.pl): #!/usr/bin/env perl use strict; use warnings; my $line = ""; while (<>) {
![PerlによるCSVの読み込みとCSVをTSVに変換するワンライナー](https://cdn-ak-scissors.b.st-hatena.com/image/square/af37977ee866988286b95e74fff98500a190545c/height=288;version=1;width=512/https%3A%2F%2Fchalow.net%2Fimages%2Ftcl-logo-25.png)