Perlゼミ

  1. Perl
  2. 演算子
  3. ファイルテスト
  4. here

最終更新から経過した日数を取得する

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

-M $file

サンプルプログラム

ファイル演算子 -M を使って最終更新から経過した日数を取得するサンプルです。

use strict;
use warnings;

# 最終更新から経過した日数を取得する。
# -M $file

print "1: 最終更新から経過した日数を取得する。\n";
my $file = "a.txt";
if (-e $file) {
  my $from_last_modify = -M $file;
  print "最終更新から $from_last_modify 日経過しています。\n";
}
else { print "$file は存在しません。\n" }

Perlプログラミングちゃんねるのご紹介

コンテンツ提供
Perlの書籍
  • 業務に役立つPerl

    ログ解析など日本語を含むテキスト処理の実践!
    この私、Perlゼミの作者が執筆しています。
    ご購入、口コミ歓迎。
  • Perlの書籍 »
自己紹介
木本裕紀

「今日も元気だ! Perlで元気!」

Perlプログラミングちゃんねる

Youtubeチャンネル登録、いいね、コメント歓迎

Twitter
フォロー、いいね、リツート、コメント歓迎

kimoto.yuki@gmail.com
応援メッセージ、質問、間違い報告歓迎

Perl総合研究所