From Mark-Jason Dominus's Infrequently Asked Questions About Perl:
tomorrow_date {
sleep 86_400;
return localtime();
}
Dominus's function is reminiscent of the transistor tester that shoots 240 volts across all three pairs of leads and then announces "Dead".