perl - FTP ファイルからの入力に改行が存在しない (Perl)

Question

Net::FTP を使用して csv ファイルをダウンロードしました。このファイルをテキストエディターや Excel で表示したり、カットアンドペーストしたりしても、改行があり、次のようになり
ます
。

Perl でファイルを読み取ると、テキスト全体が次のような 1 行として表示されます。

000000000G911|060000000000CDR|25|1230000000000EGP|19

を使って読んでみました

tie @lines, 'Tie::File', "C:/Programs/myfile.csv", autochomp=>0  or die "Can't read file: $!\n";  
foreach $l (@lines1)  
    {print "$l\n";  
}

と

open FILE, "`<`$filename" or die $!;    
my @lines=`<`FILE>;  
foreach $l (@lines)  
{print "$l\n";  
}  
close FILE;

score 3 · Accepted Answer

ファイルには、別のオペレーティングシステムからのものであるため、Perl が認識できない形式の改行があります。他のプログラムは異なる改行形式を自動的に検出しますが、Perl はそれを行いません。

Net::FTPASCII モードで転送を実行した場合(たとえば$ftp->ascii、このモードを有効にするため)、これを処理して修正する必要があります。

または、改行に何が使用されているかを把握し、特殊$/変数をその値に設定することもできます。

1 に答える 1