::: {.Section1} The Daily WTF is always great, but this Perl script is priceless. I’ve got to come up with something like this to send to my editors when I blow a deadline. (The original post accidentally left the guilty party’s real email in the listing. I obfuscated it below.):
*….*Their company runs a fairly important batch process very late at night that this particular coder was responsible for. As it turns out, "responsible" may not have been the appropriate word ...
--[Begin late.pl]------------- @titles = ("Up late...", "Still watching stuff run", "Just letting you know...", "So you know...", "Still online", "Working late", "up early this morning"); @bodies = ("Hey guys, just letting you know that we are still up with the emailreports so I won't be early this morning.", "Just letting you know that we are watching the emails now, so we will be in the office a little later.", "Steve, I just finished watching the emails go out, and will be in the office as soon as I can this morning.", "Hey, just letting you know that the emails just went out, so I will not be there as scheduled in the morning.", "Steve, I know that you like to know when we are up later watching stuff, so just letting you know that we are.", "Up late watching stuff run, will be in as soon as possible in the morning."); sendMail('steve@xxxxxxxxx.com', 'john@xxxxxxxx.com', @titles[rand($#titles)], @bodies[rand($#bodies)]."\n\nThanks,\nJohn\n\n", 'Steve', 'John'); --[End late.pl]-------------[And I thought I was slick using the Delay Send feature in Outlook….. [via ]{style="font-style:italic"}[The Daily WTF]]{style=""} :::