1

msft.csv ファイルがあります。列は「,」で区切られます。これは実際にはテーブルです。写真を投稿できません。ファイルの添付方法がわかりません。

私の仕事は：

  1. ファイルを開いて、行数と列数を数えて出力します。列は「,」で区切られます。
  2. ファイルを開き、次の列の最大値、最小値を出力します: Open、High、Low、Close、Volume、Adj Close 対応する日付とともに
  3. ファイルを開き、次の列の平均を計算して出力します: Open、High、Low、Close、Volume、Adj Close

私はいくつかの文献を読みましたが、役に立つことは何もできません。実際に私ができることは、ファイルを開いて印刷することだけでした。

Text::CSV モジュールを使用する必要があると考えましたが、正しい構文を理解できません。

私はここで最初の 6 つの章を読み進めましたhttp://www.perl.org/books/beginning-perl/ http://perldoc.perl.org/index.html の情報も読みまし
たが、これまでのところゼロ。

可能であれば、モジュールを使用して/使用せずにソリューションを確認できれば幸いです。あなたがそこで何をしたかを理解しようとしますが、それほど面倒でなければ、少なくとも何か説明していただければ幸いです.

どの文献を読むべきかアドバイスはありますか? 役に立つリンクはありますか?

ps 英語は私の第二言語なので、私の文法を許してください。

pps テキスト ファイルで smtg を実行できますが、テーブルの例は 1 つも見たことがありません。

4

1 に答える 1

2

このようなものがうまくいくはずです：

#!/usr/bin/perl
use strict;
use warnings;

my $filename = 'test.txt';
my $line;
my $lines = 0;
my @columns;

open(my $fh, '<', $filename) or die "Can't open $filename: $!";

$line = <$fh>;
@columns = split(',', $line);
$lines++ while <$fh>;
close $fh;

print "$lines lines\n";
print scalar @columns . " columns\n";
于 2013-08-13T22:58:44.213 に答える