Small tweaks for A Date With Perl