Perl入門ゼミ

テキスト処理、Linuxサーバー管理、Web開発ならPerl
  1. Perl
  2. 演算子
  3. ファイルテスト
  4. here

最終アクセスから経過した日数を取得する

最終アクセスから経過した日数を取得するには、ファイルテスト演算子「-A」を使用します。

-A $file

サンプルプログラム

ファイル演算子 -A を使って最終アクセスから経過した日数を取得するサンプルです。

use strict;
use warnings;

# 最終アクセス(読み取り)から経過した日数を取得する。
# -A $file

print "1: 最終アクセスから経過した日数を取得する。\n";
my $file = "a.txt";
if (-e $file) {
  my $from_last_access = -A $file;
  print "最終アクセスから $from_last_access 日経過しています。\n";
}
else { print "$file は存在しません。\n" }
  • Perlとはテキスト処理の記述性とパフォーマンスに優れ、正規表現が言語に組み込まれているプログラミング言語です。
  • Linuxサーバーでのフィルタリングプログラム、複数行の文字列を処理、ファイル内容の検索・置換などが得意
  • Perlはgitopensslなど広く普及したUnix/Linuxミドルウェアの補助ツールとして採用実績あり。後方互換性とポータビリティの高さがひとつの理由と推測。
  • 大量のテキストを扱うWeb開発も得意。ロングテールSEOを意識したWebサイト、アドテクやソーシャルゲームでの50ms以内のJSONの生成など。