perl - perl を使用して Excel で値を持つすべての行を検索する

Question

perl を使用して Excel から特定の XML 形式にデータを解析しようとしています。この形式は別のアプリケーションによって読み取られ、データのグラフィカルな表現が作成されます。Excel シートは、データ キャプチャ担当者によって定期的に更新されます。Spreadsheet::Read モジュールを選択しましたが、問題が発生しています。

シートは、特定のレイアウトに対応する特定のセルに分割されます。したがって、シートには次のものが含まれます。

国 | 都市 | 郊外 | リンク

各行は異なるデータなどです。

このようにすべての行を取得するようにスクリプトに指示しようとしました。

    use Spreadsheet::Read;

    my $book  = ReadData ("Captured_input.xlsx");
    my @rows = Spreadsheet::Read::rows ($book->[1]);

    print "@rows\n";

ただし、これはARRAY（およびいくつかの16進データ）を出力しますが、各行とセルを読み取って次のように返すようにします：

国1、都市1、郊外1、リンク1

国 2、都市 2、郊外 2、リンク 2

毎日実行されるため、ファイルの終わりだけを読み取るのではなく、毎回シート全体を読み取る必要があるため、変更が加えられた場合は XML を再発行します。

このように使用すると、機能してデータが返されますが、各行を手動で指定する必要がありますが、将来何行になるかを見積もることはできません。

    use Spreadsheet::Read;

    my $book  = ReadData ("Captured_input.xlsx");
    my @row = Spreadsheet::Read::cellrow ($book->[1], 4);

    print "@row\n,";

いくつかの入力をいただければ幸いです。