3日前の日付を表示する(Perl)

書式

perl -MPOSIX -e 'print strftime("%Y/%m/%d %H:%M:%S", localtime(time-(3*24*60*60)))."\n"'

説明

3日前の日付を表示するにはPerlを使って現在の時間から3日分減算した値を引数として渡します。(H.Mさんに教えてもらいました)

サンプルコード

#!/bin/bash
perl -MPOSIX -e 'print strftime("%Y/%m/%d %H:%M:%S", localtime(time-(3*24*60*60)))."\n"'