warn 'pre-wait: ' . Data::Dumper->Dump([$delay->remaining]);
$delay->wait;
warn 'post-wait: ' . Data::Dumper->Dump([$delay->remaining]);