これは基本的な質問に違いありませんが、満足のいく答えが見つかりません。ここに、CSV 形式のデータを TSV に変換するためのスクリプトがあります。これまで Perl を使用したことがなく、Perl スクリプトが実行した後に出力されるデータを保存する方法を知る必要があります。
以下のスクリプト:
#!/usr/bin/perl
use warnings;
use strict;
my $filename = data.csv;
open FILE, $filename or die "can't open $filename: $!";
while (<FILE>) {
s/"//g;
s/,/\t/g;
s/Begin\.Time\.\.s\./Begin Time (s)/;
s/End\.Time\.\.s\./End Time (s)/;
s/Low\.Freq\.\.Hz\./Low Freq (Hz)/;
s/High\.Freq\.\.Hz\./High Freq (Hz)/;
s/Begin\.File/Begin File/;
s/File\.Offset\.\.s\./File Offset (s)/;
s/Random.Number/Random Number/;
s/Random.Percent/Random Percent/;
print;
}
分析されたすべてのデータは、コマンド プロンプトにあります。このデータを保存するにはどうすればよいですか?
編集： みんなありがとう！それは完璧に機能しました！