Help for this page

Select Code to Download

Select or download this

#!/usr/bin/env perl
use strict;
...
printf "Date as supplied: %s\n", $t->dmy ('/');
$t = $t - 86400;
printf "Date minus one day: %s\n", $t->dmy ('/');

Select or download this

$ ./yesterday.pl 01/12/2022
Date as supplied: 01/12/2022
Date minus one day: 30/11/2022
$