Help for this page

Select Code to Download

Select or download this

# perl -e 'print time' will return the current time in Unix epoch form
+at

# So if you substract 43200, that should give you the current time min
+us 30 minutes in Unix epoch format:

time=$(perl -e 'print time-43200')

Select or download this

c:\@Work\Perl\monks>perl -wMstrict -le
"my $t = time;
...
Wed Aug 19 13:12:35 2020
Wed Aug 19 01:12:35 2020
Wed Aug 19 12:42:35 2020