Select Code to Download

use DateTime;

...
  last if ($d->ymd('/') eq $yesterday->ymd('/'));
  $d->add(days => 1);
}