【Perl】ファイルリストからあるIDが最初に登場したファイルと最後に登場したファイルを得る 2016-03-23-2 [Programming][Perl] ログの処理でよくやるやつを未来の自分のためにメモ。 ファイルリストからファイル中のあるIDが最初に登場したファイルと最後に登場したファイルを得る。つまりは、滞在期間・活動期間を取り出すタスク。 入力ファイルリストを入力とするファイルは時間順に並べられているファイルフォーマットはTSV形式で各行の第一カラムをIDとする出力IDごとに初登場と最終出現のファイル名を出力ファイルリストの最後のファイルに出現している場合は今後も続く可能性があるのでフラグを立てる ■コード (lifespan.pl): #!/usr/bin/env perl # -*- coding: utf-8 -*- use strict; use warnings; #
![【Perl】ファイルリストからあるIDが最初に登場したファイルと最後に登場したファイルを得る](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)